Private Sub Command3_Click()


    Dim SoapClient As MSSOAPLib30.SoapClient30
    Set SoapClient = New MSSOAPLib30.SoapClient30


    Dim WSDLPath As String
    WSDLPath = "http://127.0.0.1/soap/apaja.php?wsdl"
    Call SoapClient.MSSoapInit(WSDLPath)

        Dim bar() As cobaData

        bar = SoapClient.Get_Test_Data()
       Print bar

End Sub

<?xml version="1.0" encoding="windows-1252"?>
<definitions xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:SOAP-ENC="http://schemas.xmlsoap.org/soap/encoding/" xmlns:tns="urn:Testing_Service" xmlns:soap="http://schemas.xmlsoap.org/wsdl/soap/" xmlns:wsdl="http://schemas.xmlsoap.org/wsdl/" xmlns="http://schemas.xmlsoap.org/wsdl/" targetNamespace="urn:Testing_Service">
<types>
<xsd:schema targetNamespace="urn:Testing_Service">
 <xsd:import namespace="http://schemas.xmlsoap.org/soap/encoding/"/>
 <xsd:import namespace="http://schemas.xmlsoap.org/wsdl/"/>
 <xsd:complexType name="MyTableData">
  <xsd:all>
   <xsd:element name="lId" type="xsd:string"/>
   <xsd:element name="sValue" type="xsd:string"/>
   <xsd:element name="sText" type="xsd:string"/>
  </xsd:all>
 </xsd:complexType>
 <xsd:complexType name="MyTableArray">
  <xsd:complexContent>
   <xsd:restriction base="SOAP-ENC:Array">
    <xsd:attribute ref="SOAP-ENC:arrayType" wsdl:arrayType="tns:MyTableData[]"/>
   </xsd:restriction>
  </xsd:complexContent>
 </xsd:complexType>
</xsd:schema>
</types>
<message name="Say_HelloRequest">
  <part name="name" type="xsd:string"/></message>
<message name="Say_HelloResponse">
  <part name="return" type="xsd:string"/></message>
<message name="Get_Test_DataRequest"/>
<message name="Get_Test_DataResponse">
  <part name="return" type="tns:MyTableArray"/></message>
<portType name="Testing_ServicePortType">
  <operation name="Say_Hello">
    <documentation>Sends a greeting with your name!</documentation>
    <input message="tns:Say_HelloRequest"/>
    <output message="tns:Say_HelloResponse"/>
  </operation>
  <operation name="Get_Test_Data">
    <documentation> Get all the data from test_table.</documentation>
    <input message="tns:Get_Test_DataRequest"/>
    <output message="tns:Get_Test_DataResponse"/>
  </operation>
</portType>
<binding name="Testing_ServiceBinding" type="tns:Testing_ServicePortType">
  <soap:binding style="rpc" transport="http://schemas.xmlsoap.org/soap/http"/>
  <operation name="Say_Hello">
    <soap:operation soapAction="urn:Testing_Service#hello" style="rpc"/>
    <input><soap:body use="encoded" namespace="urn:Testing_Service" encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"/></input>
    <output><soap:body use="encoded" namespace="urn:Testing_Service" encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"/></output>
  </operation>
  <operation name="Get_Test_Data">
    <soap:operation soapAction="http://127.0.0.1/soap/apaja.php/Get_Test_Data" style="rpc"/>
    <input><soap:body use="encoded" namespace="urn:Testing_Service" encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"/></input>
    <output><soap:body use="encoded" namespace="urn:Testing_Service" encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"/></output>
  </operation>
</binding>
<service name="Testing_Service">
  <port name="Testing_ServicePort" binding="tns:Testing_ServiceBinding">
    <soap:address location="http://127.0.0.1/soap/apaja.php"/>
  </port>
</service>
</definitions>