webservices visual basic y php

[juan_14nob]

Hola estoy aprendiendo hacer un webservices entre visualbasic 6.0 y php. Estoy usando la libreria Nusoap

Lo que quiero hacer es enviar un Array a php

Tengo este codigo:


Dim strFriends(0 To 2) As String

Private Sub Command4_Click()

Wstexto = Text4

strFriends(0) = "nombre1"
strFriends(1) = "nombre2"
strFriends(2) = "nombre3"


Dim soapObject As New MSSOAPLib30.SoapClient30
soapObject.MSSoapInit "http://localhost/webservices/hola.php?wsdl"

MostrarWS = soapObject.hola(strFriends())
Text5.Text = MostrarWS


End Sub


Esto lo tengo del lado de Php.

hola.php

Código PHP:

<?php
require_once('nusoap/lib/nusoap.php');
$servidor=new soap_server();
$servidor->configureWSDL('holawsdl','urn:holawsdl');
 
$servidor->register ('hola', 
                array('nombre' => 'xsd:string'),
                array('return' => 'xsd:string'),
                'urn:holawsdl',
                'urn:holawsdl#hola',
                'rpc',
                'encoded',
                'este ejecuta hola'
);
 
function hola($nombre){
return "Este es el resultado cliente del webservices ".$nombre[0];
 
}
 
$HTTP_RAW_POST_DATA= isset($HTTP_RAW_POST_DATA) ? $HTTP_RAW_POST_DATA : '';
 
$servidor->service($HTTP_RAW_POST_DATA);
 
 
?>
 

Al presional el boton Command4_Click() me dice este error




Espero que alguien logre ayudarme.. Saludos!!!