DECLARE @scid int,@rt int
DECLARE @result nvarchar(4000) --创建MSSOAP.SoapClient组件(如果安装的是SoapToolkit30,应该是MSSOAP.SoapClient30,否则是MSSOAP.SoapClient),存储到@object中
EXEC @rt=sp_OACreate 'MSSOAP.SoapClient30',@scid out --'http://webservice.webxml.com.cn/webservices/qqOnlineWebService.asmx?wsdl'为webservice地址
--‘qqOnlineWebService’为webservice名称
EXEC @rt = sp_OAMethod @scid, 'mssoapinit',null,'http://webservice.webxml.com.cn/webservices/qqOnlineWebService.asmx?wsdl','qqOnlineWebService' --'qqCheckOnline'为webservice的一个方法,后面跟2个参数(输入参数:QQ号码 String,默认QQ号码:8698053。返回数据:String,Y = 在线;N = 离线;E = QQ号码错误;A = 商业用户验证失败;V = 免费用户超过数量)
EXEC @rt = sp_OAMethod @scid, 'qqCheckOnline', @result OUT,N'' IF @rt <> 0
BEGIN
EXEC sp_OAGetErrorInfo @scid
END
ELSE
BEGIN
select @result
END
--释放掉@scid
EXEC @rt = sp_OADestroy @scid
GO
05-07 15:19