Search results

Form sizing works well within a database. The problem is moving from one database to the next. If the user resizes the screen in one database, then moves to another db, the form size is replicated in from the previous db to the next database that's opened. How do I prevent this from occurring?

I'm building a list of e-mail recipients for a recordset using a string. No problem if the field has the data. The problem is when the field is blank in a record. I tried ... Nz(vRecipientList & rs!SubjectEMail) ... no luck vRecipientList & Nz(rs!SubjectEMail) ... no luck Any suggestions...

The following code works great for sending a report to many addressees (recordset). I want to extract another e-mail for the Bcc copies. I'm not sure how to add it to the current code. Dim rs As Recordset Dim vRecipientList As String Dim vMsg As String Dim vSubject As String...

Solution to first question: Change Popup from Yes to No (fixed the problem) Still having a problem with the second question

(1) If I cancel the process (recordset cycle) after the first one or two reports are sent (no problem); however, if I cancel later in the process, the database locks up. (2) I cannot update a field [Remarks] while cycling through the records. On Error GoTo Err_Image635_Click Dim db As...

I've narrowed the filter below to "ReloID = '" & rs!ReloID & "'" but it's still capturing all records in the query not one. Any help would be appreciated. Dim db As DAO.Database Dim rs As Object Set rs = CurrentDb.OpenRecordset("SELECT * FROM qry91To120DaysFromPDDEmail") If Not...

Can't I just put a filter on the report so when it's run it limits the record to one? [ReloID] = Forms!frmPCSTracker!ReloID This works great when running the report, without a recordset. When I use a query to filter the info I get all the records.

I'm trying to send a report to each person in my recordset. The report is different for each person (same report but individualizesdinfo). I'm having trouble filtering the report to one record (everyone in the query shows in the report). When I don't use a recordset, I can filter the report...

I cannot update a field in a tabbed form. I tried frmPCSTracker.Controls(Remarks).Value = "whatever" Any help would be appreciated.

Thanks ... no luck. I think it has something to do with tab controls. Works fine on a straight form but not a tabbed form. Do I need to reference the tab on the form when referring to the field?

The following code works fine until I try to update the Remarks field when I get the following error: "Object doesn't support this property." Not sure what I'm doing wrong. Dim OLApp As Outlook.Application Dim OLMsg As Outlook.MailItem Set OLApp = New Outlook.Application Set OLMsg =...

Assign a variant Dim varX As Variant varX = DLookup("ReturnEmail", "tblCritiques", "CritiqueID = 1")

I know how to use the DLookUp function in a report ... =DLookUp("HeaderLine1","tblLetterHead","LetterheadID = 1") Can I use with SendObject? I add the code (without = ) without success. Any suggestions?

Can I use a recordset to find blank fields? The attempt below generated a 2465 error (can't find field)? Set db = CurrentDb() Set rs = db.OpenRecordset("qryPCSTrackerWithin120Days") With rs If .RecordCount <> 0 Then rs.MoveLast iCount = rs.RecordCount Do...

Thanks. I get it. It works.

How do I refer back to the record set so it can cycle through?

I'm sorry I don't understand. Still getting the first record sent over and over again. Dim db As DAO.Database Dim rs As DAO.Recordset Dim iCount As Integer Set db = CurrentDb() Set rs = CurrentDb.OpenRecordset("qryPCSTrackerWithin120Days") If rs.RecordCount <> 0 Then rs.MoveFirst While...

Instead of looping through the records, I'm getting the same e-mail being sent over and over again. What's wrong with this loop? Thanks On Error GoTo Error_Handler Dim db As DAO.Database Dim rs As DAO.Recordset Dim iCount As Integer Set db = CurrentDb() Set rs =...

I'm trying to send out several e-mails using a recordset. I'm trying to piecemeal code without much luck. Any help would be appreciated. On Error GoTo Error_Handler Dim OLApp As Outlook.Application Dim OLMsg As Outlook.MailItem Set OLApp = New Outlook.Application Set OLMsg =...

I'm trying to create a projected time. I'm trying to add a calculated number of minutes (number field) to a Date/Time field (Medium Time), without success. I tried simply adding the fields. Do I need to convert the number into a time? If so, how? If not, what suggestions do you have. Thanks