--环境设置
sp_configure 'show advanced options', 1;
GO
RECONFIGURE;
GO
sp_configure 'Ole Automation Procedures', 1;
GO
RECONFIGURE;
GO
--创建存储过程
CREATE proc [dbo].[HttpGet]
@Url varchar(1000),
@ReturnText nvarchar(4000)='' output
as
Declare @Object as Int
declare @ResponseText nvarchar(4000)
Exec sp_OACreate 'MSXML2.XMLHTTP', @Object OUT;
Exec sp_OAMethod @Object, 'open', NULL, 'get',@Url,'false'
Exec sp_OAMethod @Object, 'send'
Exec sp_OAMethod @Object, 'responseText', @ResponseText OUTPUT
set @ReturnText = @ResponseText
Exec sp_OADestroy @Object
网友评论