hi everybody,
I still have some difficulties to acces a web service created in C# with
soap toolkit..
In fact I'd like to access it with the low-level sample that was on the
sample exemple.
I always get.. the error Message Invalid procedure call or method..
here my code :
Dim Serializer As SoapSerializer30
Dim Reader As SoapReader30
Dim ResultElm As IXMLDOMElement
Dim FaultElm As IXMLDOMElement
Dim Connector As SoapConnector30
Dim Method As String
Method = "GetList"
Set Connector = New HttpConnector30
Connector.Property("EndPointURL") =
"http://chtiws06/TIGroupDocWS/Editor.asmx?WSDL"
Connector.Connect
' binding/operation/soapoperation
Connector.Property("SoapAction") = "http://tempuri.org/" & Method
'Connector.Property("SoapAction") = "http://tempuri.org/GetList"
Connector.BeginMessage
Set Serializer = New SoapSerializer30
Serializer.Init Connector.InputStream
Serializer.StartEnvelope "soap"
Serializer.StartBody
Serializer.StartElement Method, "http://tempuri.org/"
Serializer.StartElement "strEnvironment"
Serializer.WriteString "TIDOCWEBF"
Serializer.EndElement
Serializer.StartElement "strXMLInputStream"
Serializer.WriteString
"<DDINT68S><MESSAGEVERSION>1.0</MESSAGEVERSION><MESSAGETOPIC>TIGroupDoc.Edit
or.GetList</MESSAGETOPIC><INPUT><DDWRKRGCHK>1</DDWRKRGCHK><DDWRKUSRID>TIJYP<
/DDWRKUSRID><USAPIACTIONCODE></USAPIACTIONCODE><DDINSTFTCH></DDINSTFTCH><USA
PIINSTANCETOGET>1</USAPIINSTANCETOGET><DDDDBDESC></DDDDBDESC></INPUT></DDINT
68S>"
Serializer.EndElement
Serializer.EndElement
Serializer.EndBody
Serializer.EndEnvelope
Connector.EndMessage
Set Reader = New SoapReader30
Reader.Load Connector.OutputStream
If Not Reader.Fault Is Nothing Then
MsgBox Reader.FaultString.Text, vbExclamation
Else
MsgBox CDbl(Reader.RpcResult.Text)
End If
My Soap xml file build with the serializer looks ok I checked it and if I
try to access the same web service
with the high-level code all works fine..
Any idea ??
Thanks