Pessoal estou desenvolvendo a integração do meu sistema com a IntegraFarma e preciso enviar os arquivos zipados com o gzip no webservice, alguém já fez isso?
oServer:=CreateObject( "MSXML2.ServerXMLHTTP")
oServer:Open( "POST", 'https://hml-integration.yandeh.com.br/categories' , .f. )
oServer:setRequestHeader("Content-Type", "application/gzip; charset=utf-8")
oServer:setRequestHeader("accept", "application/json" )
oServer:Send()
Envio de arquivo pelo webservice
Moderador: Moderadores
5 Mensagens • Página 1 de 1
Envio de arquivo pelo webservice
por Wanderlei » 06 Jun 2019 16:34
Wanderlei Cardoso
Analista / Programador
XHarbour + GtWvW + FiveWin + HwGui + Firebird
Skype: cwanderlei
cwanderlei@yahoo.com.br
(62)98171-3059 - whatsapp
Analista / Programador
XHarbour + GtWvW + FiveWin + HwGui + Firebird
Skype: cwanderlei
cwanderlei@yahoo.com.br
(62)98171-3059 - whatsapp
-
Wanderlei Usuário NÃvel 3 
- Mensagens: 183
- Data de registro: 25 Jan 2008 12:19
- Cidade/Estado: Goiânia - GO
- Curtiu: 13 vezes
- Mens.Curtidas: 5 vezes
Envio de arquivo pelo webservice
por Daniel » 17 Jun 2019 09:14
Ola tente assim
Talvez será necessário transformar em base64
http://www.pctoledo.com.br/forum/viewtopic.php?f=4&t=13915
oServer:=CreateObject( "MSXML2.ServerXMLHTTP")
oServer:Open( "POST", 'https://hml-integration.yandeh.com.br/categories' , .f. )
oServer:setRequestHeader("Content-Type", "application/gzip; charset=utf-8;application/x-www-form-urlencoded")
oServer:setRequestHeader("accept", "application/json" )
oServer:Send(arquivo64)
Talvez será necessário transformar em base64
http://www.pctoledo.com.br/forum/viewtopic.php?f=4&t=13915
Daniel
Harbour + Minigui + dbfcdx
Marinas-Gui Pena que parou o suporte
Harbour + Minigui + dbfcdx
Marinas-Gui Pena que parou o suporte
-
Daniel Usuário NÃvel 3 - Mensagens: 373
- Data de registro: 13 Ago 2003 22:42
- Cidade/Estado: Apucarana - PR
- Curtiu: 0 vez
- Mens.Curtidas: 36 vezes
Envio de arquivo pelo webservice
por Wanderlei » 19 Jun 2019 08:12
oi Daniel, valeu pela atenção, mas lá tem que enviar o arquivo mesmo sem transformar, estou tentando assim:
oServer:open("POST", "https://hml-integration.yandeh.com.br/categories")
oServer:setRequestHeader("content-type", "multipart/form-data; boundary=----WebKitFormBoundary7MA4YWxkTrZu0gW")
oServer:setRequestHeader("Content-Type", "application/x-www-form-urlencoded")
oServer:setRequestHeader("Authorization", "D45F40CD443E486B96BC7E551991AA0A")
oServer:setRequestHeader("User-Agent", "PostmanRuntime/7.15.0")
oServer:setRequestHeader("Accept", "* /*")
oServer:setRequestHeader("Cache-Control", "no-cache")
oServer:setRequestHeader("Postman-Token", "97e7f6bd-29af-40bb-9aca-f0303d2a2430,402dca22-1443-4ba2-b70b-969f93f6f253")
oServer:setRequestHeader("Host", "hml-integration.yandeh.com.br")
oServer:setRequestHeader("accept-encoding", "gzip, deflate")
oServer:setRequestHeader("content-length", "553")
oServer:setRequestHeader("Connection", "keep-alive")
oServer:setRequestHeader("cache-control", "no-cache")
cParm := '------WebKitFormBoundary7MA4YWxkTrZu0gW\r\nContent-Disposition: form-data; name=\"file\"; filename=\"datarey.gz\"\r\nContent-Type: false\r\n\r\n\r\n------WebKitFormBoundary7MA4YWxkTrZu0gW--'
oServer:Send(cParm)
pelo programa do postman funciona ele até me dá esse código aqui, mas na minha aplicação não envia.
oServer:open("POST", "https://hml-integration.yandeh.com.br/categories")
oServer:setRequestHeader("content-type", "multipart/form-data; boundary=----WebKitFormBoundary7MA4YWxkTrZu0gW")
oServer:setRequestHeader("Content-Type", "application/x-www-form-urlencoded")
oServer:setRequestHeader("Authorization", "D45F40CD443E486B96BC7E551991AA0A")
oServer:setRequestHeader("User-Agent", "PostmanRuntime/7.15.0")
oServer:setRequestHeader("Accept", "* /*")
oServer:setRequestHeader("Cache-Control", "no-cache")
oServer:setRequestHeader("Postman-Token", "97e7f6bd-29af-40bb-9aca-f0303d2a2430,402dca22-1443-4ba2-b70b-969f93f6f253")
oServer:setRequestHeader("Host", "hml-integration.yandeh.com.br")
oServer:setRequestHeader("accept-encoding", "gzip, deflate")
oServer:setRequestHeader("content-length", "553")
oServer:setRequestHeader("Connection", "keep-alive")
oServer:setRequestHeader("cache-control", "no-cache")
cParm := '------WebKitFormBoundary7MA4YWxkTrZu0gW\r\nContent-Disposition: form-data; name=\"file\"; filename=\"datarey.gz\"\r\nContent-Type: false\r\n\r\n\r\n------WebKitFormBoundary7MA4YWxkTrZu0gW--'
oServer:Send(cParm)
pelo programa do postman funciona ele até me dá esse código aqui, mas na minha aplicação não envia.
Wanderlei Cardoso
Analista / Programador
XHarbour + GtWvW + FiveWin + HwGui + Firebird
Skype: cwanderlei
cwanderlei@yahoo.com.br
(62)98171-3059 - whatsapp
Analista / Programador
XHarbour + GtWvW + FiveWin + HwGui + Firebird
Skype: cwanderlei
cwanderlei@yahoo.com.br
(62)98171-3059 - whatsapp
-
Wanderlei Usuário NÃvel 3 - Mensagens: 183
- Data de registro: 25 Jan 2008 12:19
- Cidade/Estado: Goiânia - GO
- Curtiu: 13 vezes
- Mens.Curtidas: 5 vezes
Envio de arquivo pelo webservice
por Daniel » 21 Jun 2019 12:38
Ola
voce tem o arquivo que esta enviando
normal sem compactar
voce tem o arquivo que esta enviando
normal sem compactar
Daniel
Harbour + Minigui + dbfcdx
Marinas-Gui Pena que parou o suporte
Harbour + Minigui + dbfcdx
Marinas-Gui Pena que parou o suporte
-
Daniel Usuário NÃvel 3 - Mensagens: 373
- Data de registro: 13 Ago 2003 22:42
- Cidade/Estado: Apucarana - PR
- Curtiu: 0 vez
- Mens.Curtidas: 36 vezes
Envio de arquivo pelo webservice
por JoséQuintas » 21 Jun 2019 14:34
É comum, parece até meio idiota comentar isso mas....
Se não me engano essa é a comunicação que NÃO funciona no XP, no Windows 7 só se atualizar/configurar.
Se não me engano essa é a comunicação que NÃO funciona no XP, no Windows 7 só se atualizar/configurar.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg, multithread, dbfcdx, ADO+MySql, PNotepad
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"
https://github.com/JoseQuintas/
Harbour 3.2, mingw, gtwvg, multithread, dbfcdx, ADO+MySql, PNotepad
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"
https://github.com/JoseQuintas/
-
JoséQuintas Membro Master 
- Mensagens: 18152
- Data de registro: 26 Fev 2007 11:59
- Cidade/Estado: São Paulo-SP
- Curtiu: 15 vezes
- Mens.Curtidas: 1215 vezes
Ver tópicos ativos •
5 Mensagens • Página 1 de 1
Quem está online
Usuários vendo este fórum: Nenhum usuário registrado online e 7 visitantes

Ola Amigo, espero que meu site e forum tem lhe beneficiado, com exemplos e dicas de programacao.
Entao divulgue o link da Doacao abaixo para seus amigos e redes sociais ou faça uma doacao para o site forum...
MUITO OBRIGADO PELA SUA DOACAO!
Entao divulgue o link da Doacao abaixo para seus amigos e redes sociais ou faça uma doacao para o site forum...
MUITO OBRIGADO PELA SUA DOACAO!
