email com Harbour
Moderador: Moderadores
email com Harbour
Olá,
É conta do GMAIL ?
Eu tenho uma solução para harbour 3.4 usando tip_MailSend
É conta do GMAIL ?
Eu tenho uma solução para harbour 3.4 usando tip_MailSend
►Harbour 3.x | Minigui xx-x | HwGui◄
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
- JoséQuintas
- Administrador

- Mensagens: 20267
- Registrado em: 26 Fev 2007 11:59
- Localização: São Paulo-SP
email com Harbour
Tem exemplos no próprio Harbour.
Opção 1: tipmail
Opção 2: libcurl
Mas tem uma questão a mais:
gmail requer conexão segura
conexão segura requer componentes opcionais do Harbour, não criados na geração normal.
Tá melhor e mais atualizado que XHarbour.
Mais provável XHarbour morrer primeiro.
Lógico... os usuários já estão matando ele em vida... aí fica duvidoso mesmo....
Opção 1: tipmail
Opção 2: libcurl
Mas tem uma questão a mais:
gmail requer conexão segura
conexão segura requer componentes opcionais do Harbour, não criados na geração normal.
Sendo prático:hazael escreveu:O 3.4 parece que está parado, então possivelmente tem futuro duvidoso.
Tá melhor e mais atualizado que XHarbour.
Mais provável XHarbour morrer primeiro.
Lógico... os usuários já estão matando ele em vida... aí fica duvidoso mesmo....
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"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 mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"
https://github.com/JoseQuintas/
email com Harbour
Harbour 3.2 ainda é distribuído pela Minigui ex. então essa coisa de morrer acho que no momento é um pouco remoto, quem sabe não sai um fork made in brazil, a exemplo que está sendo feito com a hwgui qt.JoséQuintas escreveu:hazael escreveu:
O 3.4 parece que está parado, então possivelmente tem futuro duvidoso.
►Harbour 3.x | Minigui xx-x | HwGui◄
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
email com Harbour
O exemplo é com gmail, mas pode ser usado também outra conta de email
Os dados do exemplo são fictícios.
O exemplo é com harbour 3.4
Os dados do exemplo são fictícios.
O exemplo é com harbour 3.4
►Harbour 3.x | Minigui xx-x | HwGui◄
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
email com Harbour
O meu exemplo deve produzir algo assim:
►Harbour 3.x | Minigui xx-x | HwGui◄
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
email com Harbour
Atenção para a pasta LIBSSL é a última atualização do Viktor
►Harbour 3.x | Minigui xx-x | HwGui◄
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
email com Harbour
Uma correção do zip postado.
Agora para harbour 3.4 e 3.2 ver a bat de compilação a diretiva -dhb32 para usar a função:
Hb_mimeFName 3.4
tip_FileNameMimeType 3.2
Agora para harbour 3.4 e 3.2 ver a bat de compilação a diretiva -dhb32 para usar a função:
Hb_mimeFName 3.4
tip_FileNameMimeType 3.2
- Anexos
-
TesteEmail.zip- Correção exemplo para harbour 3.2 e 3.4
- (5.04 MiB) Baixado 106 vezes
►Harbour 3.x | Minigui xx-x | HwGui◄
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
email com Harbour
Não vai funcionar mesmo.
Você precisa das libs ssl pra funcionar, olha o fonte EMAIL_SSL.PRG
Isso:
#if ! defined( __HBSCRIPT__HBSHELL )
REQUEST __HBEXTERN__HBSSL__
#endif
e isso:
IF ! tip_SSL()
RETURN Nil
ENDIF
GMAIL que é o que eu uso precisa de SSL pra autenticar.
O demo.prg tem o exemplo é só substituir os dados da conta, outra coisa precisa compilar com a lib que está na pasta LIBSSL
Você precisa das libs ssl pra funcionar, olha o fonte EMAIL_SSL.PRG
Isso:
#if ! defined( __HBSCRIPT__HBSHELL )
REQUEST __HBEXTERN__HBSSL__
#endif
e isso:
IF ! tip_SSL()
RETURN Nil
ENDIF
GMAIL que é o que eu uso precisa de SSL pra autenticar.
O demo.prg tem o exemplo é só substituir os dados da conta, outra coisa precisa compilar com a lib que está na pasta LIBSSL
►Harbour 3.x | Minigui xx-x | HwGui◄
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
email com Harbour
Olá,
qual é o provedor de email ?
qual é o provedor de email ?
►Harbour 3.x | Minigui xx-x | HwGui◄
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
email com Harbour
Isso aqui parece estar errado
'conta@servidor.com' , ; // POP3 USERNAME
Username é o nome do usuário da conta não do email
'conta@servidor.com' , ; // POP3 USERNAME
Username é o nome do usuário da conta não do email
►Harbour 3.x | Minigui xx-x | HwGui◄
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
