Step-by-Step Guide: VB call SAP Web Service

前面我们已经介绍了如何创建sap web service，以及如何使用ABAP来调用这个web service，现在我们继续往下走，使用VB来调用这个web service。因为现在不在家里，而昨天写程序测试的时候没有截图，于是只能文字说明了。

1. 安装soap toolkit

这个可以到微软那里下载，或者google，百度

2. 在vb中新建工程

3. 添加soap toolkit的引用

4. 取得sap web service的wsdl文件路径

这个在前面的文章中测试web service的时候可以找到

:/sap/bc/srt/rfc/sap/?sap-client=&wsdl=1.1″>http://<host>:<port>/sap/bc/srt/rfc/sap/<web_service>?sap-client=<client_no>&wsdl=1.1

5. 编写代码

Private Sub Command1_Click()

Dim soapClient As SoapClient30

Dim text As String

Set soapClient = CreateObject(“MSSOAP.SoapClient30″)

Call soapClient.mssoapinit(“http://sap-ides:8000/sap/bc/srt/rfc/sap/ZBOBO_WS_001?sap-client=800&wsdl=1.1″)

text = soapClient.ZboboWs001(“xuchunbo”)

MsgBox text

End Sub

6. 测试

直接点按钮，会弹出结果.