PC Toledo

Opa
Consegui fazer o arq.Json. Ai eu abro no postman,para testes e fica ok
no Postman,esta comunicando ok,

Em anexo os Headers ,veja que tem 2 Headers company e o Authorization que é um token de 1582 caracteres
ate ai ok. Funcionando e retornando.

mas ao mandar pelo Harbour usando a funcao abaixo, com a mesma Url, arq.Json, e token (que uso nos testes postman)
esta retornando :
{"status": 401, "msg": "Signature verification failed"} │

Obs, O metodo é POST ok

Tambem tentei colocar ai mais um Header
oWeb:SetRequestHeader( "company", "6431c5a87129e40007b788ee )
Mas nao funcionou
Algum detalhe faltando, alguem pode me ajudar ?

Código: Selecionar todos

cResposta := HttpPost( cUrl, oData, "application/json", "Bearer " + cToken )

 ? "Resultado: ", cResposta


FUNCTION httpPost( cUrl, oData, cHead1, cHead2 )
 LOCAL oWeb, cResposta

   oWeb := win_OleCreateObject( "MSXML2.ServerXMLHTTP" )
   oWeb:Open( "POST", cUrl, .F. )
   oWeb:SetRequestHeader( "Content-Type", cHead1 )
   oWeb:SetRequestHeader( "Authorization", cHead2 )
   oWeb:Send( hb_JsonEncode( oData ) )
   oWeb:WaitForResponse( 100 )
   cResposta := oWeb:ResponseBody()

   RETURN cResposta

A mensagem é "falha de verificação de assinatura"

Dá pra dizer que o webservice funcionou, porque retornou resposta.
agora é verificar porque ele está retornando essa mensagem.

Não sei se uma pesquisa no google ajuda.
Ou se uma olhada nas configurações do postman.

sim pesquisei e tentei varias coisas
Está correto mandar esse header assim ?
oWeb:SetRequestHeader( "company", "6431c5a87129e40007b788ee" )

Pois para o token foi ("Bearer " + cToken)
tambem testei
oWeb:SetRequestHeader( "company", ""Bearer 6431c5a87129e40007b788ee")
sem sucesso

Código: Selecionar todos

METHOD WS( cToken, cPostGet, cUrl, cMsg ) CLASS IFoodClass

   LOCAL oServer, cRetorno

   hb_Default( @cPostGet, "POST" )
   hb_Default( @cMsg, "" )

   oServer := win_OleCreateObject( "MSXML2.ServerXMLHTTP" )
   oServer:Open( cPostGet, cUrl, .F. )
   IF cToken == Nil
      oServer:SetRequestHeader( "Content-Type", "application/x-www-form-urlencoded" )
   ELSE
      oServer:SetRequestHeader( "Content-Type", "application/json" )
      oServer:SetRequestHeader( "Authorization", "Bearer " + hb_JsonDecode( cToken )[ "accessToken" ] )
   ENDIF
   oServer:Send( cMsg )
   oServer:WaitForResponse( 2000 )
   cRetorno := oServer:ResponseBody()

   RETURN cRetorno

No IFood, o bear vai com o token

OPA
Passou sem o Bearer e pediu o company
Esta comunicando no windows server 64
Show

oWeb:SetRequestHeader( "Content-Type", cHead1 ) // "application/json"
oWeb:SetRequestHeader( "company", vcompany )
oWeb:SetRequestHeader( "Authorization", cToken ) // sem Bearer

Pergunta. Porque no PC que tem windows 7, esta dando esse retorno ?

Error WINOLE/1007 Erro no suporte a canais seguros
(0x80072F7D): msxml3.dll
( DOS Error -2147352567)

Alexandre Silva escreveu:Pergunta. Porque no PC que tem windows 7, esta dando esse retorno ?
Error WINOLE/1007 Erro no suporte a canais seguros

Faltou nessa aula ?

Coisa elementar, se pegar um Windows 7 qualquer, não funciona nada de SSL.
A atualização pra isso NÃO É AUTOMÁTICA.

https://support.microsoft.com/pt-br/top ... 268bb10392

E isso é obrigatório pra NFE há muito tempo.

Mais prático atualizar grátis pra Windows 10.

é que a NFe esta funcionando, no W7 Ultimate e o webservice para averbacao de seguro tambem..
Entao pensei que poderia funcionar o acesso a API
ok Obrigado

Então, teoricamente, deveria funcionar também.

Tem outra coisa que, se não me engano, o W7 não atualiza mais: certificados raiz.
Já vi W7 mostrando certificados raiz vencidos.
Aí acaba bloqueando webservice e sites que precisam do certificado raiz mais novo.

PC Toledo

API para CIOT

API para CIOT

API para CIOT

API para CIOT

API para CIOT

API para CIOT

API para CIOT

API para CIOT

API para CIOT

API para CIOT