This module is for printing ms access 97 files to fax.
using access 97 under win95 the following module used to work.
Option Compare Database
Option Explicit
Public strBidWhere As String
Function FaxBids()
Dim dbsPhonebook As Database
Dim rstClients As Recordset
Set dbsPhonebook = CurrentDb()
Set rstClients = dbsPhonebook.OpenRecordset("Bid List Query", dbOpenDynaset)
If MsgBox("Do you want to fax bid letters" & Chr(13) & "using Microsoft Fax?",
4) = 6 Then
With rstClients
Do Until .EOF
strBidWhere = "[ALPHAID] = '" & ![ALPHAID] & "'"
DoCmd.SendObject acReport, "Fax Invitation To Bid", acFormatRTF, "[Fax: " & ![FAX_PHONE] & "]", , , , , False
.MoveNext
Loop
End With
End If
rstClients.Close
End Function
Now that i have upgraded to win98 the following error is detected:
Runtime error 2295 - Unknown message recipients; the message was not sent
The debug program points to the following as the problem.
DoCmd.SendObject acReport, "Fax Invitation To Bid", acFormatRTF, "[Fax: " & ![FAX_PHONE] & "]", , , , , False
i can't figure it out. Can anyone help me out or point me in the right direction?
email me [email protected] or reply to this post, please.
[Edited by Sackka on 05-22-2000 at 02:24 PM]
