4.8使用vb6.0调用WebService
需下载msSoapToolkit20.exe
添加引用:Microsoft Soap Type Library 
位置:”C:\Program Files\Common Files\MSSoap\Binaries\ MSSOAP1.dll”
    调用方法:
    Dim cc As New MSSOAPLib.SoapClient
    例程:
    新建工程?标准EXE?添加3个textbox控件,text1,text2,text3?添加一个button控件Command1
    代码如下:
    Option Explicit
Dim cc As New MSSOAPLib.SoapClient
Private Sub Command1_Click()
cc.mssoapinit "http://192.168.0.4/yundan/Service1.asmx?WSDL"
Me.Text3.Text = cc.test(CInt(Text1.Text), CInt(Text2.Text))
End Sub看不懂啊,有高手逐一解释吗?

解决方案 »

  1.   


     Option Explicit '有这个  错误会提示
    Dim cc As New MSSOAPLib.SoapClient' 定义CC 为 MSSOAPLib.SoapClient,其实就是把CC替换MSSOAPLib.SoapClient
    Private Sub Command1_Click()'按钮事件
    cc.mssoapinit "http://192.168.0.4/yundan/Service1.asmx?WSDL" 'MSSOAPLib.SoapClient中的函数 mssoapinit ,"http://192.168.0.4/yundan/Service1.asmx?WSDL" 这个是传进去的参数
    Me.Text3.Text = cc.test(CInt(Text1.Text), CInt(Text2.Text))'给text3控件 赋值,cc.text 同上 
    End Sub'结束事件
      

  2.   

    Microsoft Soap Type Library 干嘛用的.?
      

  3.   

    感谢2楼的回答,谢谢
    我把次程序生成的程序包,在其他电脑上安装,结果出现MSSOAP1.dll注册出错?请问怎么解决啊?
      

  4.   

    所有客戶端的PC都要安裝 soapsdk