sp_configure 'show advanced options', 1; GO RECONFIGURE; GO sp_configure 'Ole Automation Procedures', 1; GO RECONFIGURE; GO EXEC sp_configure 'Ole Automation Procedures'; GO
ALTER PROCEDURE [dbo].[Proc_System_SendSayHelloHttp]
@Parametro varchar(10) = NULL
AS
DECLARE @obj INT
DECLARE @sUrl varchar(200)
DECLARE @response INT
SET @sUrl = 'http://127.0.0.1:8008/api/Shop/SayHello'
EXEC sp_OACreate 'MSXML2.ServerXMLHTTP', @obj OUT
EXEC sp_OAMethod @obj,'Open', NULL, 'Get', @sUrl, false
EXEC sp_OAMethod @obj,'Send'
EXEC sp_OAGetProperty @obj, 'responseText', @response OUT
SELECT @response [response]
EXEC sp_OADestroy @obj
RETURN