Conectando com WebService pelo SQL

Galera infelizmente estou sem tempo para elaborar um post, porém vou deixar uma dica legal aqui, que precisei fazer para usar no meu projeto atual, espero poder ajudar e melhorar no proximo post..

 

Conectando com WS pelo SQL

/*@ThiagoThamiel 01/03/2012 */
DECLARE @ObjRemoto AS INT;
DECLARE @sRetorno AS VARCHAR(8000); 
DECLARE @sMSGRT as varchar (150)  
EXEC sp_OACreate 'MSXML2.XMLHTTP', @ObjRemoto OUT;
EXEC sp_OAMethod @ObjRemoto, 'open', NULL, 'get',  
'http://www.endereco.com.br/ws/WSteste.asmx?WSDL', 'false' 
EXEC sp_OAMethod @ObjRemoto, 'send' 
EXEC sp_OAMethod @ObjRemoto, 'responseText', @sRetorno OUTPUT   
IF RTRIM(LTRIM(@sRetorno)) = '' BEGIN 
 SET @sMSGRT =  'Servidor fora do ar' 
END  ELSE IF   RTRIM(LTRIM(@sRetorno)) LIKE '%The resource cannot be found.%' BEGIN  
SET @sMSGRT = 'Aplicação WebService não localizada' END ELSE BEGIN 
 --SET @sMSGRT = 'Sevidor WebService OK'    
 SET @sMSGRT = '' END
Exec sp_OADestroy @ObjRemoto


Categorias:Programação

Deixe uma resposta

%d blogueiros gostam disto: