Microsoft Access 掲示板

FAXCOMEXLibを使ったFAX送信 / 5

7 コメント
views
4 フォロー
5
エピ 2022/10/05 (水) 10:11:55 9f8a2@0c0df

FAXCOMLibで送信することができました。
ただFAXCOMEXLibにあるSubjectがどれなのかわかっていませんが・・・
お騒がせしました。
`Dim Fs As FAXCOMLib.FaxServer
 Dim Fd As FAXCOMLib.FaxDoc
 Dim Cpname As String
 Cpname = Environ("COMPUTERNAME")

 Set Fs = New FAXCOMLib.FaxServer

 Fs.Connect (Cpname)
 Set Fd = Fs.CreateDocument("FaxDocument")

 Fd.DisplayName = "abcdefg"
 Fd.RecipientName = "abcd"      '受信者の名前
 Fd.FileName = "**.pdf"
 Fd.FaxNumber = "000-000-0000"

 Fd.Send
 Fs.Disconnect

 Set Fd = Nothing
 Set Fs = Nothing

通報 ...