vbscript 調用WebService實現代碼
更新時間:2009年11月10日 23:53:37 作者:
vbscript 調用WebService實現代碼,需要的朋友可以參考下。
復制代碼 代碼如下:
'獲取已初始化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
相關文章
查看或修改Windows系列系統(tǒng)的序列號的vbs
查看或修改Windows系列系統(tǒng)的序列號(包括:2000,xp,2003),支持命令行2008-06-06