ocr: - Microsoft Access - (FaxReports : Module] EX 4 File Edit View Insert Debug Run Tools Window Help -EX l a - 60 (General) (Declarations) Option Compare Database Option Explicit Public strraxwnere As String Function FaxReminders() Dim osMeetings As Database Dim rstcilents As Recoraset Set osMeetings = CurrentDb() Set rstcilents = cosMeetings.Openkecoraset "Reminders", abopenpynaset) With rstcilents Do Until .EOF Strfaxunere = "Cllents.C.CllentiD = FF & - LCilents.C.CilentiDJ pocmd.JendupJect acReport, "Client Meeting Reminders", acrormatRiF, "[fax:" & ![Fax] & "]", - F - False MoveNext Loop End ...
