各位高手请指点一二如何用 SOAP VB Client 访问期 Web Server?
或者如何将下面 Perl 写成 VB
print SOAP::Lite
-> uri('http://www.soaplite.com/Demo') # package/class name
-> proxy('http://services.soaplite.com/hibye.cgi')
-> send_in()
-> result;
多谢多谢!!!
或者如何将下面 Perl 写成 VB
print SOAP::Lite
-> uri('http://www.soaplite.com/Demo') # package/class name
-> proxy('http://services.soaplite.com/hibye.cgi')
-> send_in()
-> result;
多谢多谢!!!
perl偶看不懂
首先在vb中建立一个”标准EXE”的工程。添加引用:Microsoft Soap Type library。注意:如果没有安装Microsoft Soap Toolkit,是没有这个类型库的。
可以在http://www.ourfly.com中下载。
添加一个text
Private Sub Form_Load()
Text1.Text = add()
End Sub Public Function Add() As String
Dim objSoapClient As New SoapClient
objSoapClient.ClientProperty("ServerHTTPRequest") = True
Call objSoapClient.mssoapinit("http://localhost/webserver/service1.asmx?WSDL", "Service1", "Service1Soap")
这句也可以
objSoapClient.mssoapinit("http://localhost/webserver/service1.asmx?WSDL") Add = objSoapClient.Show("龙卷风.NET")
End Function