|
I got a VB program using MSSOAP Tool kit 2.0
calling Apache SOAP 2.2 stateless session bean provider.
The service is pretty basic. Given a string
it return another string. But I got a runtime error 5053 from
VB.
------VB code----------
Private Sub Command1_Click()
Dim soapClient As MSSOAPLib.soapClient Set soapClient = CreateObject("MSSOAP.SoapClient") soapClient.mssoapinit ("http://localhost/RequirementServer.wsdl") Debug.Print soapClient.getStatementText("10") soapClient = Nothing End Sub ----the WSDL--------
<?xml version='1.0' encoding='UTF-8'
?>
<definitions name='urn:RequirementServer' targetNamespace= 'http://tempuri.org/wsdl/' xmlns:wsdlns='http://tempuri.org/wsdl/' xmlns:typens='http://tempuri.org/type' xmlns:soap='http://schemas.xmlsoap.org/wsdl/soap/' xmlns:xsd='http://www.w3.org/2001/XMLSchema' xmlns='http://schemas.xmlsoap.org/wsdl/'> <types> <schema targetNamespace='http://tempuri.org/type' xmlns='http://www.w3.org/2001/XMLSchema' xmlns:SOAP-ENC='http://schemas.xmlsoap.org/soap/encoding/' xmlns:wsdl='http://schemas.xmlsoap.org/wsdl/' elementFormDefault='qualified'> </schema> </types> <message name='getStatementTextRequest'> <part name='statementNumber' type='xsd:string'/> </message> <message name='getStatementTextResponse'> <part name='statementText' type='xsd:string'/> </message> <portType name='getStatementTextPortType'> <operation name='getStatementText' parameterOrder='statementNumber'> <input message='tns:getStatementTextRequest' /> <output message='tns:getStatementTextResponse' /> </operation> </portType> <binding name='getStatementTextBinding' type='tns:getStatementTextPortType' > <soap:binding style='rpc' transport='http://schemas.xmlsoap.org/soap/http' /> <operation name='getStatementText' > <soap:operation soapAction='' /> <input> <soap:body use='encoded' namespace='http://tempuri.org/message/' encodingStyle='http://schemas.xmlsoap.org/soap/encoding/' /> </input> <output> <soap:body use='encoded' namespace='http://tempuri.org/message/' encodingStyle='http://schemas.xmlsoap.org/soap/encoding/' /> </output> </operation> </binding> <service name='RequirementServer' > <port name='getStatementTextPort' binding='tns:getStatementTextBinding' > <soap:address location='http://localhost/soap/rpcrouter' /> </port> </service> </definitions> |
