VB6.0调用WebService

VB6.0调用webservice简要方法

查了很多VB6连接webservice的资料，基本类似，就是有些地方介绍的不够细，可能是我太菜，始终没调成功。主要是带参数这一块，总是报错。反复试了多次才解决。发出来与大家分享一下。

1、安装 SoapToolkit30.EXE

2、新建工程并在工程中引用 Microsoft Soap Type Library v3.0

3、插入一个按钮，使用以下代码：

Private Sub command1_click()
      Dim myClient As New SoapClient30                   'SoapClient30对象实例化

      Set MySoap = New SoapClient30                        '这句注释后貌似也没啥影响
      myClient.MSSoapInit "http://localhost/MCISWebService/vbtest.asmx?WSDL"                '引用webservice地址
      MsgBox myClient.HelloWorld                             '调用webservice方法HelloWorld
End Sub

4、如果WebService方法带有参数，代码如下

      MsgBox myClient.HelloWorld(val1,val2)

注意：

① 在VB中，WebService的方法需要完整的敲出来，不能自动补全。

② 所带参数需要转成对应的数据类型，比如时间等。