Help! VB to Apache Soap

[Kar YEOW <ka...@apir.com.au>]

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>