vivlinsew
Feb 21st, 2005, 09:54 PM
Purpose of project :
Client(VB) will send the "SendContentURL" to server after "mssoapinit" the wsdl file.
Details :
I try to debug the program by using Step Into(F8). As client(VB) mssoapinit the wsdl file, the server will send the WSDL file through tcp connection. The client(VB) continue and stop at the "MsgBox lobj.SendContentURL", thus an error message "Application-defined or object-defined error" pop up.
The following is the Client(VB) code,
Sub Main()
Dim lobj As New MSSOAPLib.SoapClient
lobj.ClientProperty("ServerHTTPRequest") = True
' Initialization of WSDL URL using soap client tool kit
lobj.mssoapinit "http://219.94.43.6:2503/MAXIS_EWIG.WSDL"
strTimeStamp = Format$(Now, "DDMMYYYYHHMMSS")
MsgBox lobj.SendContentURL(3177, "beta", "beta", "36322",123, "60126563277", strTimeStamp, 2999, "Message", "http://203.115.229.184/wapcontent/andy.mid?id=99999", "", "", "W")
If Err <> 0 Then
MsgBox "initialization failed " + Err.Description
End If
End Sub
The following is the WSDL file located in server,
http://219.94.43.6:2503/MAXIS_EWIG.WSDL
Would much appreciate if anyone could state the problem and solution. Thanks in advance.
Client(VB) will send the "SendContentURL" to server after "mssoapinit" the wsdl file.
Details :
I try to debug the program by using Step Into(F8). As client(VB) mssoapinit the wsdl file, the server will send the WSDL file through tcp connection. The client(VB) continue and stop at the "MsgBox lobj.SendContentURL", thus an error message "Application-defined or object-defined error" pop up.
The following is the Client(VB) code,
Sub Main()
Dim lobj As New MSSOAPLib.SoapClient
lobj.ClientProperty("ServerHTTPRequest") = True
' Initialization of WSDL URL using soap client tool kit
lobj.mssoapinit "http://219.94.43.6:2503/MAXIS_EWIG.WSDL"
strTimeStamp = Format$(Now, "DDMMYYYYHHMMSS")
MsgBox lobj.SendContentURL(3177, "beta", "beta", "36322",123, "60126563277", strTimeStamp, 2999, "Message", "http://203.115.229.184/wapcontent/andy.mid?id=99999", "", "", "W")
If Err <> 0 Then
MsgBox "initialization failed " + Err.Description
End If
End Sub
The following is the WSDL file located in server,
http://219.94.43.6:2503/MAXIS_EWIG.WSDL
Would much appreciate if anyone could state the problem and solution. Thanks in advance.