客户端:
Dim soap As SoapClient30
Set soap = New SoapClient30
Call soap.MSSoapInit("http://server/a/abc.wsdl") '指向wsdl文件
MsgBox soap.Add(12, 44) '调用dll中的Add方法
Set soap = Nothing
测试例子
客户端程序:
Sub main()
Dim objHTTP As New MSXML2.XMLHTTP
Dim strEnvelope As String
Dim strReturn As String
Dim objReturn As New MSXML2.DOMDocument
Dim dblTax As Double
Dim strQuery As String