jak volat webovou službu z t-sql

K tomu byste měli použít SQLCLR nebo externí program. V SQL 20106 můžete použít R z TSQL a v SQL 2017 můžete také použít Python. Málokdy je dobrý nápad provádět volání webových služeb z TSQL, a pokud tak učiníte, měli byste obvykle stahovat z fronty. V takovém případě můžete použít externí program.

Procesy sp_oaxxx jsou staré, těžko použitelné, málo známé, vyžadují nebezpečnou konfiguraci serveru atd., atd.

Jak již bylo řečeno, zde je nějaký kód, který jsem vyhrabal z usenetu, který jsem napsal před dlouhou, dlouhou dobou:

create procedure http_get( @sUrl varchar(200), @response varchar(8000) out)
As
begin
    Declare
      @obj   int
     ,@hr   int
     ,@status int
     ,@msg varchar(255)

       exec @hr = sp_OACreate 'MSXML2.ServerXMLHttp', @obj OUT
       if @hr < 0 begin Raiserror('sp_OACreate MSXML2.ServerXMLHttp failed', 16,1) return 1 end
       exec @hr = sp_OAMethod @obj, 'Open', NULL, 'GET', @sUrl, false
       if @hr <0 begin set @msg = 'sp_OAMethod Open failed' goto eh end
       exec @hr = sp_OAMethod @obj, 'send'
       if @hr <0 begin  set @msg = 'sp_OAMethod Send failed' goto eh end
       exec @hr = sp_OAGetProperty @obj, 'status', @status OUT
       if @hr <0 begin  set @msg = 'sp_OAMethod read status failed' goto eh end
       if @status <> 200  begin set @msg = 'sp_OAMethod http status ' + str(@status) goto eh end
       exec @hr = sp_OAGetProperty @obj, 'responseText', @response OUT
       if @hr <0 begin  set @msg = 'sp_OAMethod read response failed' goto eh end
       exec @hr = sp_OADestroy @obj
       return 0
    eh:
      exec @hr = sp_OADestroy @obj
      Raiserror(@msg, 16, 1)
      return 1
end