Dim soapclient, result

Set soapclient = CreateObject("MSSOAP.SoapClient30")

soapclient.mssoapinit "MyTestWebService.wsdl"

result = soapclient.Add( 1 , 2 )

MsgBox result

相关文章: