Mudanças

Ir para: navegação, pesquisa

UniDANFE/Integrando o UniDANFE ao ERP/EnviarOutrosEmails

2 031 bytes adicionados, 18h59min de 23 de junho de 2022
sem sumário de edição
* smtpTLS: 1=autenticar usando TLS; 0=não (default)
* smtpFormatoRemetente: [email protected] (default); 1=nome <[email protected]>
 
== Como enviar outros emails usando a unidanfe_dfe.dll ==
 
Caso seu sistema esteja integrado ao UniDANFE pela UNIDANFE_DFE.DLL, você pode enviar os e-mails de aplicações externas para o UniDANFE sem precisar gerar o XML acima. Basta, nesse caso, passar tudo por parâmetros.
Os nomes dos parâmetros são idênticos aos nomes das TAGS do XML.
Abaixo, o mesmo exemplo utilizando a UNIDANFE_DFE.DLL:
 
 
<pre>
dfeInit("emailExt");
dfeSetParametro('EmailRemetente', '[email protected]');
dfeSetParametro('NomeRemetente', 'Meu Nome Ltda');
dfeSetParametro('Data', '2015-12-25');
dfeSetParametro('Destinatarios', '[email protected]');
dfeSetParametro('CC', '[email protected];[email protected]');
dfeSetParametro('ReplyTo', '[email protected]');
dfeSetParametro('Assunto', 'Boletos para pagamento');
dfeSetParametro('Anexo1', 'c:\pasta\boleto1.pdf');
dfeSetParametro('Anexo2', 'c:\outrapasta\novoarquivo.xml');
...
dfeSetParametro('Anexo9', 'c:\pastaxx\teste\docto.docx');
dfeSetParametro('ComprovanteTEF1', 'c:\pasta\boleto1.pdf');
dfeSetParametro('Prioridade', '3');
dfeSetParametro('Texto', 'Bem vindo ao uso de e-mail externo para o UniDANFE.;;Esse é um exemplo de texto para o corpo do e-mail.;Use o ponto-e-vírgula para quebrar linhas.;;att,;Minha empresa');
// observe que não precisa informar a TAG <conta>
dfeSetParametro('smtpServidor', 'smtp.gmail.com');
dfeSetParametro('smtpPorta', '587');
dfeSetParametro('smtpConta', '[email protected]');
dfeSetParametro('smtpAutenticar', '1');
dfeSetParametro('smtpSSL', '0');
dfeSetParametro('smtpTLS', '1');
dfeSetParametro('smtpSenha', '@MudeJa');
dfeSetParametro('smtpHelo', '');
dfeSetParametro('smtpFormatoRemetente', '0');
dfeExecuta();
IF dfeGetErro() = ""
MESSAGE("O email foi enviado ao UniDANFE com sucesso!");
ELSE
MESSAGE(dfeGetErro());
END
dfeKill();
</pre>
3 255
edições

Menu de navegação