Jump to content

dev botao

envio de email....


Carlos Paiva
Go to solution Solved by Daniel Simoes,
  • Este tópico foi criado há 899 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

  • Membros Pro

 BOM dia

utilizando o acbrmonitor.exe 

preciso colocar um TEXTO no Email 
estou tentando assim e NAO envia o texto e nem da erro

como seria o comando ?

desde já agradeço


        a = ppath + [\] +alltrim(pusuario) + '.txt'
         cTxt      = memoread(a)
         *x_comando = [EMAIL.TextoMensagem("]+cTxt+[")]      --->  ja  tentei assim e tambem Não vai o texto
           x_comando = [EMAIL.TextoMensagem(a)]
         acbr_comandar_nfe(x_comando)


 

Link to comment
Share on other sites

  • Membros Pro

NAO da erro, simplesmente o email vai sem O TEXTO no corpo do email

           x_comando = [EMAIL.TextoMensagem(a)]
         acbr_comandar_nfe(x_comando)
apos este comando verifiquei o 
LOG.txt e eleestav com o TEXT dentro
nao sei se isso é normal

 

sainfe.txt
OK: Enviando e-mail em segundo plano...


Log.txt      apos finalizar

18/04/2022 11:54:46 - EMAIL.Enviar
18/04/2022 11:54:46 - OK: Enviando e-mail em segundo plano...
18/04/2022 11:54:46 - Email: Iniciando processo de envio.
18/04/2022 11:54:46 - Email: Configurando o cabeçalho do e-mail.
18/04/2022 11:54:46 - Email: Logando no servidor de e-mail.
18/04/2022 11:54:47 - Email: Iniciando os envios.
18/04/2022 11:54:47 - Email: Processando lista de destinatários.
18/04/2022 11:54:48 - Email: Enviando dados.
18/04/2022 11:54:49 - Email: Fazendo Logout no servidor de e-mail.
18/04/2022 11:54:49 - Email: Enviado com sucesso

Link to comment
Share on other sites

  • Membros Pro

Daniel  boa tarde.
esta COMPLETO  antes de começar deleto todos os *.txt  para nao fazer confusao.

coloquei um stop antes e um depois do envio do texto  renomeio os txt  
001.txt,  002.txt  e  Log.txt
MUDEI o comando para um texto simples para ver se fazia.

         x_comando = [EMAIL.TextoMensagem("textotextotexto")]
         acbr_comandar_nfe(x_comando)

mais tambem NAO mandou o texto no email.


NOTE que quando faz o 18/04/2022 13:57:39 - EMAIL.TextoMensagem("texto tttttttttt tttttttttttt ")
apesar de falar OK  ele APAGA o log.txt

o comando NAO esta errado ?!



001.txt:
18/04/2022 13:57:00 - EMAIL.Assunto("Boletos em ABERTOS")
18/04/2022 13:57:00 - OK:

002.txt:
18/04/2022 13:57:39 - EMAIL.TextoMensagem("texto tttttttttt tttttttttttt ")
18/04/2022 13:57:39 - OK: 

log.txt:
18/04/2022 13:58:13 - EMAIL.Enviar
18/04/2022 13:58:13 - OK: Enviando e-mail em segundo plano...
18/04/2022 13:58:13 - Email: Iniciando processo de envio.
18/04/2022 13:58:13 - Email: Configurando o cabeçalho do e-mail.
18/04/2022 13:58:13 - Email: Logando no servidor de e-mail.
18/04/2022 13:58:13 - Email: Iniciando os envios.
18/04/2022 13:58:14 - Email: Processando lista de destinatários.
18/04/2022 13:58:14 - Email: Enviando dados.
18/04/2022 13:58:15 - Email: Fazendo Logout no servidor de e-mail.
18/04/2022 13:58:16 - Email: Enviado com sucesso

Link to comment
Share on other sites

  • Consultores
3 horas atrás, Carlos Paiva disse:

será   caracter dentro do TEXT ?  (   )   !!!

se eu passo o TEXTO para o comando o o LOG.txt    fica a IMAGEM do texto rs

Qual é o nome do arquivo configurado para gravar o log?

[]'s

Consultor SAC ACBr

Elton
Profissionalize o ACBr na sua empresa, conheça o ACBr Pro.

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Um engenheiro de Controle de Qualidade(QA) entra num bar. Pede uma cerveja. Pede zero cervejas.
Pede 99999999 cervejas. Pede -1 cervejas. Pede um jacaré. Pede asdfdhklçkh.
Link to comment
Share on other sites

  • Consultores
3 horas atrás, Carlos Paiva disse:

será   caracter dentro do TEXT ?  (   )   !!!

se eu passo o TEXTO para o comando o o LOG.txt    fica a IMAGEM do texto rs

Como assim o log fica a imagem do texto?

O seu email deveria ter ido com a mensagem

Citar

texto tttttttttttt

 

 

 

Consultor SAC ACBr

Victor H Gonzales - Pandaaa
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.  Discord

Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil

Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

"Aprender é a única coisa que a mente nunca se cansa, nunca tem medo e nunca se arrepende” - Leonardo da Vinci

"Ter sucesso é falhar repetidamente, mas sem perder o entusiasmo"

Link to comment
Share on other sites

  • Membros Pro

Victor Obrigado pela atenção

ao executar o comando  EMAIL.TextoMensagem("texto tttttttttt tttttttttttt ")

o log.txt  é limpo e exibe o que esta abaixo

18/04/2022 13:57:39 - EMAIL.TextoMensagem("texto tttttttttt tttttttttttt ")
18/04/2022 13:57:39 - OK:

estou Tentando colocar um texto (um arquivinho com as duplicatas em atraso)

NAO é NFE nem CUPOM 
é UM relatório onde procuro quem esta atrasado e mando um email com os boletos.

esta TUDO certo  só que o TEXTO deveria ser o relatório gerado
e ele NAO mostra

coloquei o assunto + o texto   ai exibe tudo lá no assunto ++++++ o relatório sai todo emendado
ate tentei colocar chr(13) + chr(10)  após cada linha   ++++ não adiantou

esse comando   EMAIL.TextoMensagem("texto tttttttttt tttttttttttt ")   deve estar com problema
vou ver se gero um txt com todos os comandos que uso e posto aqui

PAiva


 

Link to comment
Share on other sites

  • Membros Pro

faço assim:

acbr_comandar_nfe("EMAIL.Novo")

x_comando = [EMAIL.AdicionaPara("]+alltrim(t_email)+[")]
acbr_comandar_nfe(x_comando)

x_comando = [EMAIL.Assunto("]+tASSUNTO+[")]
acbr_comandar_nfe(x_comando)

a = ppath + [\] +alltrim(pusuario) + '.txt'
cTxt      = memoread(a)
x_comando = [EMAIL.TextoMensagem("]+alltrim(cTxt)+[")]
acbr_comandar_nfe(x_comando)

    For x := 1 To Len( pAttach )
        if pAttach[x] <> NIL
            x_comando = [EMAIL.AdicionaAnexo("]+pAttach[x]+[", "xxxxxxx",0)]
            acbr_comandar_nfe(x_comando)
       endif
   Next

acbr_comandar_nfe("EMAIL.Enviar")

Link to comment
Share on other sites

  • Fundadores
  • Solution

Como está a configuração "EMAIL.UsarHTML" ?

https://acbr.sourceforge.io/ACBrMonitor/EMAILUsarHTML.html

Veja ainda "EMAIL.TextoAlternativo"

https://acbr.sourceforge.io/ACBrMonitor/EMAILTextoAlternativo.html

Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Link to comment
Share on other sites

  • Fundadores

o UsarHTML, permite que você mande um texto formatado em HTML. na propriedade "TextoMensagem"...

Acho que ele estava tentando criar o email como HTML, e como não haviam as Tags, o Leitor de email não mostrava o texto...

Geralmente usasse TextoMensagem em HTML e o mesmo conteúdo, sem HTML em TextoAlternativo,  para leitores de email  que filtram HTML

Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Link to comment
Share on other sites

×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.

The popup will be closed in 10 seconds...