Histórico da Página
Local oRestClient := FWRest():New("http://code.google.com")//)
oRestClient:setPath("/p/json-path/")
If oRestClient:Get()
ConOut(oRestClient:GetResult())
Else
conout(oRestClient:GetLastError())
Endif
Return
Exemplo de envio de arquivo .gz
Clique para visualizar o exemplo
Toggle Cloak | ||
---|---|---|
|
Cloak | ||
---|---|---|
| ||
#include "protheus.ch" //------------------------------------------------------------------- /*/{Protheus.doc} x16165 Função para post na API /api/batch/contratos em https://seusite.com.br, utilizando da classe @sample U_x16165() @author Daniel Mendes @since 22/03/2019 @version 1.0 /*/ //------------------------------------------------------------------- user function x16165() local oRestClient as object local cUrl as char local cPath as char local aHeadOut as array local oFile as object cUrl := "https://seusite.com.br"cPath := "/api/batch/contratos" aHeadOut := {} Aadd(aHeadOut, "Authorization: Basic " + Encode64("app01:fTdUlDgdQQ4MRQhLahykiKhON6k97Zfly5SV6fwpa5zCE")) Aadd(aHeadOut, "Content-Type: application/json") Aadd(aHeadOut, "Content-Encoding: gzip") oFile := FwFileReader():New("\contratos_20190316.gz") if oFile:Open() oRestClient := FWRest():New(cUrl) oRestClient:SetPath(cPath) oRestClient:SetPostParams(Encode64(oFile:FullRead())) oFile:Close() if oRestClient:Post(aHeadOut) showResult(oRestClient:GetResult()) else showResult(oRestClient:GetLastError()) endif FWFreeVar(@oRestClient) endif FWFreeVar(@oFile) return nil //------------------------------------------------------------------- /*/{Protheus.doc} showResult Exibe o resultado do método POST, sendo em console ou tela @param cValue String contendo o conteúdo que será exibido @sample showResult("Teste") @author Daniel Mendes @since 22/03/2019 @version 1.0 /*/ //------------------------------------------------------------------- static function showResult(cValue) if IsBlind() Conout(cValue) else MsgInfo(cValue) endif return nil |
Painel | ||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|
NewSintaxe
|
Painel | ||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|
SetPathSintaxe
|
Painel | ||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
GetSintaxe
|
Painel |
---|
GetResultSintaxe |
Painel |
---|
GetLastErrorSintaxe |
Painel | ||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|
PostSintaxe
|
Painel | ||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|
SetPostParamsSintaxe
|
Painel | ||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
PutSintaxe
|
Painel | ||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
DeleteSintaxe
|
Painel | ||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
SetChkStatusSintaxe Descrição
|
Painel | ||
---|---|---|
GetChkStatusSintaxe Descrição
|
Painel | ||
---|---|---|
GetHTTPCodeSintaxe Descrição
|
Painel | ||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
SetGetParamsSintaxe Descrição Parâmetros
|