Usar Thunderbird e enviar email via linha de comando

Mensagem por **Itamar M. Lins Jr.** » 07 Nov 2024 17:56

Olá!
Não irei aqui colocar as telas da instalação deste programa. <next>, <next> ,<finish> conforme o email ele já configura imap(gmail), smtp, etc...
Apenas o que é mais importante, a linha de comando, para chamar do nosso .exe

Código: Selecionar todos

         wapi_ShellExecute( 0, 'open', 'thunderbird', '-compose "to=' + "'" + AllTrim(cEmail) + "'," + ;
                         "subject='"+cSubject+"',preselectid='id1',body='"+cBody+"',attachment='" + cArqPDF + ['"]  , ,  )

Saudações,
Itamar M. Lins Jr.

Mensagem por **Itamar M. Lins Jr.** » 07 Nov 2024 18:00

Olá!
O texto em HTML! Vc faz conforme seu gosto! Com letras diferentes e imagens.

Código: Selecionar todos

cBody := '<!DOCTYPE html><html>'
      cBody += '<meta http-equiv="content-type" content="text/html; charset=UTF-8">'
      cBody += '<head>'
      cBody += '</head>'
      cBody := '<body>Olá, ' + so->socio
      cBody += '<p> Seu pagamento foi confirmado com sucesso'
      cBody += '<p> Forma de pagamento: ' + cFormPgto 
      cBody += '<p> Valor pago: ' + Transform(nTotal,'@e 999,999.99')
      ...
 etc

Saudações,
Itamar M. Lins Jr.

Eroni · Mensagem por **Eroni** » 02 Abr 2025 19:18

Boa noite Itamar.
Me parece uma boa solução para o caso do gmail que está bloqueando todos os apps de terceiros.
Sabe se existe alguma maneira de enviar diretamente o email sem abrir a tela do Thunderbird? E no caso de vários arquivos anexos, como ficar a sintaxe?
Obrigado e Abraços.

Mensagem por **Itamar M. Lins Jr.** » 02 Abr 2025 19:37

Olá!
Foi a primeira coisa que procurei.
Não tem(não achei nos exemplos), se tem, não sei como é.

Saudações,
Itamar M. Lins Jr.