Clipper On Line • Ver Tópico - SMTPSEND no Harbour

SMTPSEND no Harbour

Projeto Harbour - Compilador de código aberto compatível com o Clipper.

Moderador: Moderadores

 

SMTPSEND no Harbour

Mensagempor reinaldo » 19 Abr 2021 18:02

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
reinaldo
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 105
Data de registro: 02 Mai 2005 13:08
Cidade/Estado: santos/sp
Curtiu: 0 vez
Mens.Curtidas: 1 vez

SMTPSEND no Harbour

Mensagempor Itamar M. Lins Jr. » 19 Abr 2021 18:24

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.
Avatar de usuário

Itamar M. Lins Jr.
Colaborador

Colaborador
 
Mensagens: 6927
Data de registro: 30 Mai 2007 11:31
Cidade/Estado: Ilheus Bahia
Curtiu: 309 vezes
Mens.Curtidas: 503 vezes

SMTPSEND no Harbour

Mensagempor reinaldo » 19 Abr 2021 20:25

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
reinaldo
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 105
Data de registro: 02 Mai 2005 13:08
Cidade/Estado: santos/sp
Curtiu: 0 vez
Mens.Curtidas: 1 vez

SMTPSEND no Harbour

Mensagempor Itamar M. Lins Jr. » 19 Abr 2021 20:44

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.
Avatar de usuário

Itamar M. Lins Jr.
Colaborador

Colaborador
 
Mensagens: 6927
Data de registro: 30 Mai 2007 11:31
Cidade/Estado: Ilheus Bahia
Curtiu: 309 vezes
Mens.Curtidas: 503 vezes

SMTPSEND no Harbour

Mensagempor JoséQuintas » 20 Abr 2021 08:01

reinaldo escreveu: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é 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/
Avatar de usuário

JoséQuintas
Membro Master

Membro Master
 
Mensagens: 18014
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 15 vezes
Mens.Curtidas: 1206 vezes

SMTPSEND no Harbour

Mensagempor JoséQuintas » 20 Abr 2021 08:15

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.
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/
Avatar de usuário

JoséQuintas
Membro Master

Membro Master
 
Mensagens: 18014
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 15 vezes
Mens.Curtidas: 1206 vezes

SMTPSEND no Harbour

Mensagempor reinaldo » 20 Abr 2021 10:15

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
Anexos
SmtpSend.rar
(579.91 KiB) Baixado 87 vezes
ENVMAIL2.PRG
(2.19 KiB) Baixado 76 vezes
reinaldo
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 105
Data de registro: 02 Mai 2005 13:08
Cidade/Estado: santos/sp
Curtiu: 0 vez
Mens.Curtidas: 1 vez

SMTPSEND no Harbour

Mensagempor reinaldo » 20 Abr 2021 11:16

já consegui me entender com o Gmail
reinaldo
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 105
Data de registro: 02 Mai 2005 13:08
Cidade/Estado: santos/sp
Curtiu: 0 vez
Mens.Curtidas: 1 vez




Retornar para Harbour

Quem está online

Usuários vendo este fórum: Nenhum usuário registrado online e 4 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!
Faça uma doação para o forum
cron
v
Olá visitante, seja bem-vindo ao Fórum Clipper On Line!
Efetue o seu login ou faça o seu Registro