SMTPSEND no Harbour

[reinaldo]

Boa Tarde, amigos

Estou começando no Harbour e este Forum já está me ajudando bastante. Sei que logo vou precisar dele.
Baixei o Harbour 3.2
Um programa que uso muito no Clipper é o SMTPSEND.
Como faço para executá-lo no Harbour

Obrigado

[Itamar M. Lins Jr.]

Olá!
No harbour usamos tip_MailSend().
Mas vc pode usar o smtpsend igual no Clipper. Eu não sei como vc usa no Clipper, se for um programa externo, pode chamar igual faz no Clipper.
Aqui no forum tem alguns exemplos de MAILSEND.
Tem o CURL também, mas é mais complicado de usar.
Como diz o espanhol "mira" na pasta do harbour \contrib\hbtip\tests\email.prg

Saudações,
Itamar M. Lins Jr.

[reinaldo]

Boa Noite, Itamar
Obrigado pela resposta.
Uso o SMTPSEND assim:
MEMOWRIT("E_NVIO.TXT",v_file)
cMacro="SMTPSEND -@E_NVIO.TXT > VERRO.TXT"
!&cMacro.
v_Erro:=MEMOREAD("VERRO.TXT")

Está dando o seguinte erro na execução:

ANTES DA CHAMADA SMTPSEND
Exceção Não Tratada: System.IO>IOException: Identificador Inválido
APÓS O SMTPSEND
em System.IO._Error.WinIOError(Int32 errorCode, String maybeFullPath)
em System.IO._Error.WinIOError()
em System.Console.Clear()
em SmtpSend.Program.ShowProgScreen()
em SmtpSend.Program.Program.Main(String{} args)

Prefiro usar o SMTPSEND porque é comum enviaramos emails para até 30 destinatários (várias empresas envolvidas no processo) e ele permite isso

[Itamar M. Lins Jr.]

Olá!
Coloca o código fonte que vc usa no clipper e funciona.
Assim não posso testar aqui.
Onde baixo o smtpsend ? Qual é o seu compilador ? Tá parecendo Visual Studio...
Tá parecendo erro do windows. Vc usa clipper com windows para isso ? Ou só funciona no DOS ?

Saudações,
Itamar M. Lins Jr.

[JoséQuintas]

Prefiro usar o SMTPSEND porque é comum enviaramos emails para até 30 destinatários (várias empresas envolvidas no processo) e ele permite isso

As centrais de email costumam bloquear assim.

Já testou direto na linha de comando, pra ver se funciona?

A mensagem dá a impressão de que precisa indicar o path completo, o que em programas Windows é relativamente normal, porque o path do prompt não costuma ser o mesmo path default do Windows.

Uma possível alternativa é executar via BAT, se isso fizer diferença para esse smtpsend.
Mas o mais comum seria pela função ShellExecute() da API Windows, indicando o path de execução.

Lembrando que o PATH se refere a TODO COMANDO, e não apenas ao EXE.

[JoséQuintas]

Não custa avisar:
No começo do Harbour 3.2, há muitos anos, o Harbour tinha problema com PATHs.
Não sei se o seu Harbour 3.2 pode ser daquela época.

[reinaldo]

Bom dia

Já descobri o erro. O GMAIL está bloqueando. Preciso descobrir, pois envio a muito tempo e nunca falhou.
Fiz um programa simples em Clipper e depois compilei no Harbour.
Usei outro Servidor e está funcionando até em 64 bits.
Vou anexar o programa (não reparem, é muito simples) e o SMTPSEND. Para enviar para 30 remetentes como eu, basta ir repetindo as
linhas "b" e/ou "c"
O corpo do email e o anexo (que podem ser vários, é só repetir a linha) devem arquivo TXT (corpo) e qualquer formato (anexo)
Fico grato se me informarem e como pego a ultima versão do Harbour
Estou começando agora, e certamente vou precisar de mais ajuda.

Obrigado a todos

[reinaldo]

já consegui me entender com o Gmail