vbscript 调用WebService实现代码
时间:2022-08-14 09:30:27|栏目:VBS|点击: 次
复制代码 代码如下:
'获取已初始化Soap对象
Public Function GetSoapClient(sURL)
Dim oSoap
Set oSoap = CreateObject("MSSOAP.SoapClient")
oSoap.mssoapinit sURL
Set GetSoapClient = oSoap
End Function
'用户绑定对应序列号
sub BindCodeNumber()
Dim oSoap
Dim sURL
dim str
sURL = ""
'sURL =""
Set oSoap = GetSoapClient(sURL)
'str = oSoap.HelloWorld()
Set oSoap = Nothing
'msgbox str
End sub
BindCodeNumber
上一篇:VBS显示当前标准时间
栏 目:VBS
下一篇:没有了
本文标题:vbscript 调用WebService实现代码
本文地址:http://www.codeinn.net/misctech/210789.html