Enviar Arquivo via EMAIL.Enviar

[Jose Carlos Barbosa]

Olá pessoal....

Estou tentando enviar arquivo via EMAIL.Enviar() e não estou conseguindo

Estou fazendo alguma coisa errada. Faço via ACBR enviando arquivo ENT.TXT   -  ACBr MonitorPLUS Ver.1.1.0.58

A configuração do e-mail esta ok  

EMAIL.Novo()
OK: Novo E-mail iniciado!
EMAIL.AdicionaPara("[email protected]","MARIA AP ROQUE DOS SANTOS")
EMAIL.AdicionaCC("[email protected]")
EMAIL.Assunto("Boleto de NFe")
EMAIL.TextoAlternativo("Segue em Anexo Boleto Emitiro Referente NFe - 006138  -  LAIZA CONFECCOES LTDA")
EMAIL.AdicionaAnexo("C:\Boletos\NFe-6116-4.PDF")
EMAIL.ConfirmarLeitura(True)
EMAIL.Enviar()

abaixo é o retorno e não recebo nada nos e-mail acima

OK: E-mail [email protected] adicionado a lista "Para".
 

em EMAIL.TextoAlternativo já mudei para EMAIL.TextoMensagem ( mesma msg)

Harbour/Clipper

 

Grato e no aguardo

[José M. S. Junior]

Boa tarde, passe um comando de cada vez... Você deve receber o retorno de cada linha de configuração informada...

[Jose Carlos Barbosa]

Obrigado José.

 

Deu certo...

[Jose Carlos Barbosa]

Junior....

Como faço para na mensagem do boleto pular linhas e ex colocar dados da empresa que esta enviando...  EX   menagem, pular 2 linhas, colocar nome, pular linha e colocar fone ja fiz "mensagem"+chr(13)+chr(10)+Nome+ +chr(13)+chr(10)+Fone, na tela de envio aparece, mas no e-mail recebido não.

Segue em anexo Boleto da NFe- 400

 

Jose Carlos

Fone:(99) 9999-9999

EMAIL.Novo()
OK: Novo E-mail iniciado!
EMAIL.AdicionaPara("[email protected]","MARIA AP ROQUE DOS SANTOS")
OK: E-mail [email protected] adicionado a lista "Para".
EMAIL.Assunto("Boleto de NFe")
OK: 
EMAIL.TextoMensagem("Segue em Anexo Boleto Emitiro Referente NFe - 006138  -  

LAIZA CONFECCOES LTDA
Fone: 19-34686554 ")
OK: 
EMAIL.AdicionaAnexo("C:\Boletos\NFe-6116-4.PDF")
OK: Anexo incluido com sucesso!
EMAIL.Enviar()
Email: Iniciando processo de envio.
Email: Configurando o cabeçalho do e-mail.
Email: Logando no servidor de e-mail.
Email: Iniciando os envios.
Email: Processando lista de destinatários.
Email: Enviando dados.
Email: Fazendo Logout no servidor de e-mail.
Email: Enviado com sucesso
OK: E-mail enviado com sucesso!

 

Grato

 

[Jose Carlos Barbosa]

Olá  Pessoal, alguém tem alguma sugestão sobre o post acima

 

Grato

[BigWings]

11 minutos atrás, Jose Carlos Barbosa disse:

Olá  Pessoal, alguém tem alguma sugestão sobre o post acima

Tente chamar EMAIL.TextoMensagem() para cada linha do e-mail.

[Jose Carlos Barbosa]

Olá.... não funcionou não enviando mensagem 1 para cada linha....

no aguardo

[BigWings]

59 minutos atrás, Jose Carlos Barbosa disse:

Olá.... não funcionou não enviando mensagem 1 para cada linha....

no aguardo

Verdade, o comando EMAIL.TEXTOMENSAGEM envia a parte em HTML do e-mail.

Então você pode fazer o seguinte:

- Desativar o envio HTML e enviar como texto puro:

EMAIL.UsarHTML(0)
EMAIL.TextoAlternativo("Linha 1")
EMAIL.TextoAlternativo("Linha 2")

- Usar tags HTML para fazer a quebra de linha

EMAIL.UsarHTML(1)
EMAIL.TextoMensagem("Linha 1<br>")
EMAIL.TextoMensagem("Linha 2<p>")

 

[Jose Carlos Barbosa]

Olá  BigWings.... deu certo da maneira que fiz abaixo.....

EMAIL.Novo()
OK: Novo E-mail iniciado!
EMAIL.AdicionaPara("[email protected]","MARIA AP ROQUE DOS SANTOS")
OK: E-mail [email protected] adicionado a lista "Para".
EMAIL.Assunto("Boleto de NFe")
OK: 
EMAIL.TextoAlternativo("Segue em Anexo Boleto Emitido Referente NFe - 006138")
OK: 
EMAIL.UsarHTML(True)
OK: 
EMAIL.TextoAlternativo("   ")
OK: 
EMAIL.TextoAlternativo("LAIZA CONFECCOES LTDA")
OK: 
EMAIL.TextoAlternativo("Fone: (19)3468-6554")
OK: 
EMAIL.TextoAlternativo("E-Mail: [email protected]")
OK: 
EMAIL.AdicionaAnexo("C:\Boletos\NFe-6124-4.PDF")
OK: Anexo incluido com sucesso!
EMAIL.ConfirmarLeitura(True)
OK: 
EMAIL.Enviar()

.....só um detalhe no envio a linha fone e e-mail estão ok,porem quando recebo e-mail não estão corretos..... o que poderia ser...  (ponto em e-mail e  telefone que seria   (19)3468-6554)

 

 

GRATO E NO AGUARDO....

 

[BigWings]

2 horas atrás, Jose Carlos Barbosa disse:

 .....só um detalhe no envio a linha fone e e-mail estão ok,porem quando recebo e-mail não estão corretos..... o que poderia ser...  (ponto em e-mail e  telefone que seria   (19)3468-6554)

Como está a configuração de codificação do email no ACBrMonitorPLUS?

[Jose Carlos Barbosa]

OI..... seria esta

[José M. S. Junior]

Boa tarde, deixe a configuração do campo codificação como: UTF_8

[Jose Carlos Barbosa]

Olá José Jr...

Deu certo...

Muito obrigado.