SQL 调用 webservice

webservice 
需要配置为get 方式

sp_configure 'show advanced options', 1;

GO

RECONFIGURE;

GO

sp_configure 'Ole Automation Procedures', 1;

GO

RECONFIGURE;

GO

/********************************************/



declare @ServiceUrl as varchar(1000) 

declare @UrlAddress varchar(500)

--WebService地址：以http开头，结尾带斜杠，例如'http://webservice.webxml.com.cn/WebServices/MobileCodeWS.asmx/' 

set @UrlAddress = 'http://127.0.0.1/Service/MessageService.asmx/'



declare @FunName varchar(50)

--WebService中调用的方法名：例如'getMobileCodeInfo'

set @FunName = 'SendMessage'   



--以下参数对应WebService中4个参数的[参数名]

DECLARE @appcode NVARCHAR(50)

DECLARE @password NVARCHAR(50)

DECLARE @sendModes NVARCHAR(50)

DECLARE @title NVARCHAR(50)

DECLARE @content NVARCHAR(50)

DECLARE @needReply VARCHAR(1)

DECLARE @bizObjId NVARCHAR(50)

DECLARE @senderUserID NVARCHAR(50)

DECLARE @receiveUserIds NVARCHAR(50)

DECLARE @receiveAcounts NVARCHAR(50)

DECLARE @sendTime DATETIME

DECLARE @expiredTime DATETIME



SET @appcode=N'PersonalPortal'

SET @password=N'PersonalPortal'

SET @sendModes=N'%E7%9F%AD%E4%BF%A1'

SET @title=N'test'

SET @content=N'test'

SET @needReply='0'

SET @bizObjId=N'test'

SET @senderUserID=N'工号'

SET @receiveUserIds=''

SET @receiveAcounts='手机号码或邮件'

SET @sendTime=GETDATE()

SET @expiredTime=DATEADD(HOUR,1,GETDATE())



set @ServiceUrl = @UrlAddress + @FunName + '?appcode=' + @appcode +'&'  

+ 'password=' + @password +'&' 

+ 'sendModes=' + @sendModes +'&' 

+ 'title=' + @title +'&' 

+ 'content=' + @content +'&' 

+ 'needReply=' + @needReply +'&' 

+ 'bizObjId=' + @bizObjId +'&' 

+ 'senderUserID=' + @senderUserID +'&' 

+ 'receiveUserIds=' + @receiveUserIds +'&' 

+ 'receiveAcounts=' + @receiveAcounts +'&' 

+ 'sendTime=' + CONVERT(VARCHAR(50),@sendTime,120)  +'&'     

+ 'expireTime=' +   CONVERT(VARCHAR(50),@expiredTime,120)                     

 

 PRINT   @ServiceUrl           





Declare @Object as Int

Declare @ResponseText as Varchar(8000)

                  

Exec sp_OACreate 'MSXML2.XMLHTTP', @Object OUT;

Exec sp_OAMethod @Object, 'open', NULL, 'get',@ServiceUrl,'false'

Exec sp_OAMethod @Object, 'send'

Exec sp_OAMethod @Object, 'responseText', @ResponseText OUTPUT

     

Select @ResponseText     

Exec sp_OADestroy @Object