Pessoal !
Tenho que fazer uma rotina pra pegar pedidos e enviar as postagens efetuadas em um markeplace, e ele utiliza a API que usa arquitetura Rest.
Alguem tem experiencia ou uma luz por onde comerçar ?

Moderador: Moderadores
Procedure Main ()
Public wCode64 :="dmVuZGFzQGhhcmRzb2Z0bmV0LmNvbS5ickA0ODEzLTMyUzQtNEJVVC0zTzdH"
Public wURL := [https://api.marketplace.cissamagazine.com.br/items/020097/price]
Public wServerWS := Win_OleCreateObject("MSXML2.ServerXMLHTTP")
With Object wServerWS
:Open( "GET", wURL, .F. )
:SetRequestHeader( "Content-Type", 'text/xml; charset="utf-8"' )
:SetRequestHeader( "Authorization", "Basic " + wCode64 )
:Send( " " )
? wServerWS:responseText
inkey (0)
End With
Return nil
Achei o erro. Estava no codigo de 64bits.
Public wCode64 :="dmVuZGFzQGhhcmRzb2Z0bmV0LmNvbS5ickA0ODEzLTMyUzQtNEJVVC0zTzdH"
binho_fasa escreveu:Algumas informações como logins entre outros precisam ser convertidos a base 64 por questões de segurança.
Usuários vendo este fórum: Nenhum usuário registrado online e 10 visitantes