ADVPL – Como conectar em um serviço Rest com autenticação em cabeçario


Para autenticar fornecendo seus usuário e senha em um cabeçalho de HTTP Basic, você deve enviar no HEADER da requisição HTTP o campo Authorization conforme o modelo abaixo:

GET /rest/sample
Host: localhost:8080
Accept: application/json
Authorization: BASIC YWRtaW46MTIzNDU2

A chave precisa estar composta do usuário e senha no formato base64, ou seja, utilize a função: Encode64 ()

Usuário e senha precisarão estar juntos ( usuário:senha ), exemplo:
aAdd(aHeader,”Authorization: Basic “+Encode64(“usuário“+”:”+”senha” ) )

 

Exemplo de código:

method JsonPost(cURL, cPath, cJSON) class teste
local aHeader := {}
Local aAux :={}
Local iVez :=0
local aPostRet
Local bRet
Local cHRet

AADD(aHeader,’POST /dataservice/consultarotacep HTTP/1.1′)
AADD(aHeader,’Host: sitexxx.com.br’)

AADD(aHeader,’Content-Type: application/json’)

AADD(aHeader,”cache-control: no-cache”)
aAdd(aHeader,”Authorization: Basic “+Encode64(“usuário“+”:”+”senha” ) )

cId := HttpPost(cURL + cPath, , cJson, 120, aHeader, @cHRet) // executa url

bRet := (‘OK’ $ cHRet) // Valida retorno

 

 

Deixe um comentário

O seu endereço de e-mail não será publicado. Campos obrigatórios são marcados com *

Esse site utiliza o Akismet para reduzir spam. Aprenda como seus dados de comentários são processados.