Boa noite Itamar.
Me parece uma boa solução para o caso do gmail que está bloqueando todos os apps de terceiros.
Sabe se existe alguma maneira de enviar diretamente o email sem abrir a tela do Thunderbird? E no caso de vários arquivos anexos, como ficar a sintaxe?
Obrigado e Abraços.
Pesquisa resultou em 20 ocorrências
- 02 Abr 2025 19:18
- Fórum: Contribuições, Dicas e Tutoriais
- Tópico: Usar Thunderbird e enviar email via linha de comando
- Respostas: 3
- Exibições: 3291
- 20 Ago 2022 13:31
- Fórum: Banco de Dados
- Tópico: LetoDB para xharbour 1.2.3 Bcc 7.4
- Respostas: 18
- Exibições: 14368
LetoDB para xharbour 1.2.3 Bcc 7.4
Boa tarde,
Alguém sabe qual fonte precisa adicionar para gerar a lib rddleto.lib em xHarbour?
Pois eu gerei aqui conforme as instruções mas na hora de linkar a aplicação apresenta um monte de unresolved external.
Gerei com estes:
rddsys.obj
letocl.obj
leto1.obj
letomgmn.obj
common_c.obj
blowfish ...
Alguém sabe qual fonte precisa adicionar para gerar a lib rddleto.lib em xHarbour?
Pois eu gerei aqui conforme as instruções mas na hora de linkar a aplicação apresenta um monte de unresolved external.
Gerei com estes:
rddsys.obj
letocl.obj
leto1.obj
letomgmn.obj
common_c.obj
blowfish ...
- 22 Jul 2022 11:27
- Fórum: Ferramentas de Apoio
- Tópico: ACBrMonitorPLUS - Impressão da DACTE em PDF
- Respostas: 4
- Exibições: 8353
ACBrMonitorPLUS - Impressão da DACTE em PDF
Bom dia a todos
Ressuscitando tópico antigo, alguém já fez a impressão do DACTE usando Fivewin com a tPrinter?
Abraços.
Ressuscitando tópico antigo, alguém já fez a impressão do DACTE usando Fivewin com a tPrinter?
Abraços.
- 07 Fev 2018 11:02
- Fórum: Contribuições, Dicas e Tutoriais
- Tópico: Classe tGNRE
- Respostas: 36
- Exibições: 21167
Classe tGNRE
Ressussitando o tópico, alguem fez alguma mudança na classe na parte dos endereços dos websevices?
A que eu baixei não está funcionando, dando mensagem de endereço não encontrado? Alguem tem a classe atual funcionando?
Grato.
A que eu baixei não está funcionando, dando mensagem de endereço não encontrado? Alguem tem a classe atual funcionando?
Grato.
- 14 Set 2017 11:51
- Fórum: [x]Harbour
- Tópico: E-social Consulta
- Respostas: 55
- Exibições: 25985
E-social Consulta
Pois é, concordo plenamente.
Usando xHarbour 121, FiveWin 1209 SqlRdd, já acertei a assinatura para constar.
Abraços.
Usando xHarbour 121, FiveWin 1209 SqlRdd, já acertei a assinatura para constar.
Abraços.
- 14 Set 2017 10:42
- Fórum: [x]Harbour
- Tópico: E-social Consulta
- Respostas: 55
- Exibições: 25985
E-social Consulta - Resolvido
Bom dia e obrigado a todos que responderam.
José Quintas, obrigado pela aula.
Resolvido.
O que eu fiz:
Depois de fazer varios testes em separado, compilando com fivewin, compilando sem fivewin, compilando com xHarbour 123, compilando com 121, isso sempre fora do meu projeto, apenas tudo em um ...
José Quintas, obrigado pela aula.
Resolvido.
O que eu fiz:
Depois de fazer varios testes em separado, compilando com fivewin, compilando sem fivewin, compilando com xHarbour 123, compilando com 121, isso sempre fora do meu projeto, apenas tudo em um ...
- 13 Set 2017 13:41
- Fórum: [x]Harbour
- Tópico: E-social Consulta
- Respostas: 55
- Exibições: 25985
E-social Consulta
Desculpe João, mas não entendi sua resposta.
- 13 Set 2017 13:00
- Fórum: [x]Harbour
- Tópico: E-social Consulta
- Respostas: 55
- Exibições: 25985
E-social Consulta
Segue o código:
#include "hbclass.ch"
#ifndef XML_UTF8
#define XML_UTF8 '<?xml version="1.0" encoding="utf-8"?>'
#endif
*----------------------------------------------------------------------------*
FUNCTION Main()
LOCAL oSefaz := ESocialClass():New()
WITH OBJECT oSefaz
:cChave := "1.2.201709 ...
#include "hbclass.ch"
#ifndef XML_UTF8
#define XML_UTF8 '<?xml version="1.0" encoding="utf-8"?>'
#endif
*----------------------------------------------------------------------------*
FUNCTION Main()
LOCAL oSefaz := ESocialClass():New()
WITH OBJECT oSefaz
:cChave := "1.2.201709 ...
- 13 Set 2017 12:37
- Fórum: [x]Harbour
- Tópico: E-social Consulta
- Respostas: 55
- Exibições: 25985
E-social Consulta
João, tentei como no seu exemplo, também o mesmo erro:
Subsystem Call ....: MSXML2.XMLHTTP
System Code .......: 3
Default Status ....: .F.
Description .......: DISP_E_MEMBERNOTFOUND
Operation .........: SEND
Arguments .........: [ 1] = Type: C Val: <?xml version="1.0" encoding="utf-8"?><soapenv ...
Subsystem Call ....: MSXML2.XMLHTTP
System Code .......: 3
Default Status ....: .F.
Description .......: DISP_E_MEMBERNOTFOUND
Operation .........: SEND
Arguments .........: [ 1] = Type: C Val: <?xml version="1.0" encoding="utf-8"?><soapenv ...
- 13 Set 2017 10:22
- Fórum: [x]Harbour
- Tópico: E-social Consulta
- Respostas: 55
- Exibições: 25985
E-social Consulta
Bom dia,
Usei o xHarbour 1.2.3 sem fivewin, pois não tenho a versão atualizada, mesmo erro:
----------------------------- xHarbour Error Log ------------------------------
Date...............: 09/13/17
Time...............: 10:15:03
Application name...: D:\Tmp\Teste\Teste.Exe
Workstation name ...
Usei o xHarbour 1.2.3 sem fivewin, pois não tenho a versão atualizada, mesmo erro:
----------------------------- xHarbour Error Log ------------------------------
Date...............: 09/13/17
Time...............: 10:15:03
Application name...: D:\Tmp\Teste\Teste.Exe
Workstation name ...
- 12 Set 2017 22:06
- Fórum: [x]Harbour
- Tópico: E-social Consulta
- Respostas: 55
- Exibições: 25985
E-social Consulta
Boa noite.
Jair, copiei e colei o seu código e na execução gerou o erro abaixo:
Application
===========
Path and name: D:\Tmp\Teste\Teste.Exe (32 bits)
Size: 1,910,784 bytes
Compiler version: xHarbour build 1.2.1 Intl. (SimpLex) (Rev. 9656)
FiveWin Version: FWHX 12.08
Windows version: 6.2 ...
Jair, copiei e colei o seu código e na execução gerou o erro abaixo:
Application
===========
Path and name: D:\Tmp\Teste\Teste.Exe (32 bits)
Size: 1,910,784 bytes
Compiler version: xHarbour build 1.2.1 Intl. (SimpLex) (Rev. 9656)
FiveWin Version: FWHX 12.08
Windows version: 6.2 ...
- 12 Set 2017 14:26
- Fórum: [x]Harbour
- Tópico: E-social Consulta
- Respostas: 55
- Exibições: 25985
E-social Consulta
Não consegui descobrir onde está o erro ainda.
- 12 Set 2017 14:00
- Fórum: [x]Harbour
- Tópico: E-social Consulta
- Respostas: 55
- Exibições: 25985
E-social Consulta
Boa tarde, alguém que usa xHarbour poderia testar o código abaixo?
Grato.
#include "hbclass.ch"
#ifndef XML_UTF8
#define XML_UTF8 '<?xml version="1.0" encoding="UTF-8"?>'
#endif
FUNCTION Main()
LOCAL cChave := "1.2.201709.0000000000000226099"
LOCAL oESocial := ESocialClass():New()
oESocial ...
Grato.
#include "hbclass.ch"
#ifndef XML_UTF8
#define XML_UTF8 '<?xml version="1.0" encoding="UTF-8"?>'
#endif
FUNCTION Main()
LOCAL cChave := "1.2.201709.0000000000000226099"
LOCAL oESocial := ESocialClass():New()
oESocial ...
- 11 Set 2017 08:31
- Fórum: [x]Harbour
- Tópico: E-social Consulta
- Respostas: 55
- Exibições: 25985
E-social Consulta
Bom dia José, agradeço pela sua atenção. Como já tenho estas mesmas rotinas rodando tanto pra gerir a NFe quanto NFSe, estou inclinado a acreditar ainda que deve ser algum problema relacionado a este webservice especifico do esocial, ou no xml, ou na url, estou descartando por enquanto algum ...
- 09 Set 2017 08:24
- Fórum: [x]Harbour
- Tópico: E-social Consulta
- Respostas: 55
- Exibições: 25985
E-social Consulta
Bom dia José, obrigado por responder, fiz alguns testes, todos sem sucesso ainda:
Usando assim:
oComunicacao:send( StringToByteArray( ::cXmlEnvelope )
STATIC FUNCTION StringToByteArray( cTexto )
LOCAL aResult := {}, oElement
FOR EACH oElement IN cTexto
AAdd( aResult, Asc( oElement ) )
NEXT ...
Usando assim:
oComunicacao:send( StringToByteArray( ::cXmlEnvelope )
STATIC FUNCTION StringToByteArray( cTexto )
LOCAL aResult := {}, oElement
FOR EACH oElement IN cTexto
AAdd( aResult, Asc( oElement ) )
NEXT ...