i have to use fax service in my site
and i use this code
Set objFaxDocument = WScript.CreateObject("FaxComEx.FaxDocument")
Set objFaxServer = WScript.CreateObject("FaxComEx.FaxServer")
Dim JobID
objFaxServer.Connect("ds06")
objFaxDocument.Body = "C:\fax.txt"
objFaxDocument.DocumentName = "My First Fax"
objFaxDocument.Priority = "2"
objFaxDocument.Recipients.Add("12123151777")
objFaxDocument.AttachFaxToReceipt = True
objFaxDocument.CoverPageType = "1"
objFaxDocument.CoverPage = "generic"
objFaxDocument.Note = "Here is the info you requested"
objFaxDocument.ReceiptAddress = "[email protected]"
objFaxDocument.Subject = "Today's fax"
objFaxDocument.Sender.Title = "Mr."
objFaxDocument.Sender.Name = "Test Man"
objFaxDocument.Sender.City = "Test City"
objFaxDocument.Sender.State = "FL"
objFaxDocument.Sender.Company = "Test Company"
objFaxDocument.Sender.Country = "USA"
objFaxDocument.Sender.Email = "[email protected]"
JobID = objFaxDocument.ConnectedSubmit(objFaxServer)
MsgBox("The Job ID is :" & JobID(0))
objFaxServer.Disconnect()
when i click fax.vbs
then error accured
error:Operation Failed
Code:80070002
line:32 "that is JobID = objFaxDocument.ConnectedSubmit(objFaxServer)"
when i execute coldfusion file
<cfexecute name="C:\Windows\System32\cscript.exe"
arguments="C:\Inetpub\wwwroot\dev\fax.vbs">
</cfexecute>
then nothing shows and not any message.
is there i must to install fax server fax modem fax printer
or in which it will be send fax to specific no.
any help will be realy appreciated.
thanks in advance
.
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
Order the Adobe Coldfusion Anthology now!
http://www.amazon.com/Adobe-Coldfusion-Anthology/dp/1430272155/?tag=houseoffusion
Archive:
http://www.houseoffusion.com/groups/cf-talk/message.cfm/messageid:352736
Subscription: http://www.houseoffusion.com/groups/cf-talk/subscribe.cfm
Unsubscribe: http://www.houseoffusion.com/groups/cf-talk/unsubscribe.cfm
