我做过试验,别的机器运行下面的程序,说不能连接传真服务。
我查过资料,说可能和RPC 有关,我不知道怎么办。请问谁弄过,能教教我吗?我的程序如下:
Dim FS As New FAXCOMLib.FaxServer
Dim FD As New FAXCOMLib.FaxDoc FS.Connect ("my computer name") ' My Computer's name
Set FD = FS.CreateDocument("c:\test_rtf.rtf")
FD.FileName = "c:\test_rtf.rtf"
FD.FaxNumber = "15555555555"
FD.DisplayName = "Tel-5553731181"
FD.DiscountSend = 0
FD.SendCoverpage = 0
FD.Send
FS.Disconnect
Set FD = Nothing
Set FS = Nothing
我查过资料,说可能和RPC 有关,我不知道怎么办。请问谁弄过,能教教我吗?我的程序如下:
Dim FS As New FAXCOMLib.FaxServer
Dim FD As New FAXCOMLib.FaxDoc FS.Connect ("my computer name") ' My Computer's name
Set FD = FS.CreateDocument("c:\test_rtf.rtf")
FD.FileName = "c:\test_rtf.rtf"
FD.FaxNumber = "15555555555"
FD.DisplayName = "Tel-5553731181"
FD.DiscountSend = 0
FD.SendCoverpage = 0
FD.Send
FS.Disconnect
Set FD = Nothing
Set FS = Nothing
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货