i am developing a hotel site. when a person submit the form
the message should to go their efax.how i should proceed. any body can help me?

Recommended Answers

All 3 Replies

i tried this code
<%Option Explicit

Const StringToFax = "Hello world from text."

Dim objSoap, SendfaxResult
Dim B

B = Stream_StringToBinary(StringToFax,"us-ascii")

Set objSoap = Server.CreateObject("MSSOAP.SOAPClient30")

objSoap.ClientProperty("ServerHTTPRequest") = True

objSoap.mssoapinit("http://ws.interfax.net/dfs.asmx?WSDL")

objSoap.ConnectorProperty("EnableAutoProxy") = True

'SendfaxResult = objSoap.Sendfax("username", "password", "5480015", B , "txt")
SendfaxResult = objSoap.SendfaxEx_2("username", "password", "5480015", "", B, _
"txt", UBOUND(B)+1, Now, 3, "MyCSID", "", "", "Fax Subject", "myaddress@mydomain.com", _
"Letter", "Landscape", False, True)


'SendfaxResult = objSoap.Sendfax("your user name", "your password", "+44965157785", base64_Text, "html")

If CLng(SendfaxResult) > 0 Then
Response.Write "Fax submitted. Transaction ID: " & SendfaxResult
Else
Response.Write "Error sending fax. Return code: " & SendfaxResult
End If


Function Stream_StringToBinary(Text, CharSet)
Const adTypeText = 2
Const adTypeBinary = 1

'Create Stream object
Dim BinaryStream 'As New Stream
Set BinaryStream = CreateObject("ADODB.Stream")

'Specify stream type - we want To save text/string data.
BinaryStream.Type = adTypeText

'Specify charset For the source text (unicode) data.
If Len(CharSet) > 0 Then
BinaryStream.CharSet = CharSet
Else
BinaryStream.CharSet = "us-ascii"
End If

'Open the stream And write text/string data To the object
BinaryStream.Open
BinaryStream.WriteText Text

'Change stream type To binary
BinaryStream.Position = 0
BinaryStream.Type = adTypeBinary

'Open the stream And get binary data from the object
Stream_StringToBinary = BinaryStream.Read

'Clean up
BinaryStream.Close
Set BinaryStream = Nothing

End Function

%>
but i ,m getting the error as
Error Type:
Server object, ASP 0177 (0x800401F3)
Invalid class string
/myweb/fax.asp, line 10
is this becos i m using ssoap client which is not supported

are you trying to get it to fax to the hotel or send them an email of the fax?

SOAP is supported as long as you have the dlls installed on the server. It looks like the code you have is example only code from the providers of the fax service. And which is line 10 of the code? Very difficult to track down the problem if we don't know which line the error refers to.

Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.