Sends a fax to a specified destination.
object.Send(
UserName As String,
To As String,
From As String,
PhoneNumber As String,
CoverText As String,
FileName As String,
LogoFileName As String,
AppTag As String)
Integer. Returns the message "Fax send successful" if the fax is successfully sent; otherwise, returns the message "Fax send failed" accompanied by an error code.
This example sends the fax.bas file from NetWare Man to Lucky Dog at phone number 555-6323.
Sub Main
Set FAX = CreateObject("UCX:CHEYENNE.FAX")
To = "Lucky Dog"
From = "NetWare Man"
Phone = "555-6323"
CoverText = "This is cover text"
Filename = "sys:nsn\user\fax.bas"
LogoFileName = "sys:nsn\user\fax.bas"
AppTag = ""
Fax.Send("Admin",To,From,Phone,CoverText,Filename,LogoFileName,AppTag)
if(Err.Number <> 0)
print “Fax send failed “&Err.Description
else
print “Fax send successful”
End If
End Sub