之看到有send FAX的 sending FAX in ASP.NET I'm trying to send FAX on Win2K using ASP.NET and have the following code.<br>everything goes fine except an "Th data is invalid" exception encounters when trying to send a .pdf or .doc etc files.<br><br>here goes the code:<br><br> Dim objFaxServer As New FAXCOMLib.FaxServer()<br> Dim objFaxDocument As Object<br> Dim JobID As Long<br><br> objFaxDocument = objFaxServer.CreateDocument("")<br> objFaxDocument.CoverpageName = "D:Cover Page.cov"<br> objFaxDocument.CoverpageNote = "Test Note"<br> objFaxDocument.CoverpageSubject = "Test Subject"<br> objFaxDocument.DiscountSend = 0<br> objFaxDocument.FaxNumber = "6677152"<br> objFaxServer.Connect("K2") ' K2 is the server name<br><br> ' Send the Fax<br> JobID = objFaxDocument.Send()
看下这个 Sub test() 'Dim FaxServer As New FAXCOMLib.FaxServer Set FaxServer = CreateObject("FaxServer.FaxServer")
Dim FaxDoc As Object FaxServer.Connect "dvt-svr1" Set FaxDoc = FaxServer.CreateDocument("c:\test.doc")
sending FAX in ASP.NET
I'm trying to send FAX on Win2K using ASP.NET and have the following code.<br>everything goes fine except an "Th data is invalid" exception encounters when trying to send a .pdf or .doc etc files.<br><br>here goes the code:<br><br> Dim objFaxServer As New FAXCOMLib.FaxServer()<br> Dim objFaxDocument As Object<br> Dim JobID As Long<br><br> objFaxDocument = objFaxServer.CreateDocument("")<br> objFaxDocument.CoverpageName = "D:Cover Page.cov"<br> objFaxDocument.CoverpageNote = "Test Note"<br> objFaxDocument.CoverpageSubject = "Test Subject"<br> objFaxDocument.DiscountSend = 0<br> objFaxDocument.FaxNumber = "6677152"<br> objFaxServer.Connect("K2") ' K2 is the server name<br><br> ' Send the Fax<br> JobID = objFaxDocument.Send()
Sub test()
'Dim FaxServer As New FAXCOMLib.FaxServer
Set FaxServer = CreateObject("FaxServer.FaxServer")
Dim FaxDoc As Object
FaxServer.Connect "dvt-svr1"
Set FaxDoc = FaxServer.CreateDocument("c:\test.doc")
FaxDoc.FaxNumber = "0214624716"
FaxDoc.RecipientName = "Test"
FaxDoc.Send
Set FaxDoc = Nothing
FaxServer.Disconnect
Set FaxServer = Nothing
End Sub
快速,自动的发传真应用(win2000)vb的,你研究一下