Pesquisar na Comunidade

Olá Estou com um problema no envio de e-mail com o PDF em anexo, ao tentar enviar o e-mail exibe o seguinte erro: SMTP ERROR: Login:Success-Other undefined Status 220 2.0.0 Ready to start TLS Fiz vários teste e em alguns deles o e-mail foi enviado, mas tenho duvidas quanto ao procedimento que fiz, primeiramente vou passar os dados iniciais que ocorre o erro ACBr instalado para usar com a Capicom (Li em um outro tópico "Ainda Sobre O Envio de E-Mail" um problema parecido, mas dizia que só acontecia com OpenSSL então abri este por achar que era diferente) A Impressão da NFE é por Rave Report e da NFCe é por Fortes Report Servidor SMTP = smtps.bol.com.br porta = 587 SSL = False TLS = True Enviar PDF = True Situações 1 - Exibe o erro informado ao tentar enviar e-mail da NFCe, se for NFe envia normal desde que não tenha tentado enviar e-mail da NFCe antes, caso tenha tentado enviar e-mail da NFCe antes, também da o mesmo erro no envio da NFe. 2 - Alterei o TLS para ficar TRUE quando for NFe e FALSE quando for NFCe, neste caso enviou e-mail para a NFCe mas deu o erro para a NFe 3 - Alterei TLS para False, neste caso não da problema de envio em ambas as notas, gostaria de saber se pode deixar o TLS sempre False, ou se isso pode causar algum problema no cliente? 4 - Alterei o TLS para TRUE e também para não enviar o PDF como anexo, neste caso também enviou e-mail para ambas as notas apenas com o XML como anexo, porem isto não resolve o problema, mas deixa a entender que o problema é com o PDF 5 - Gerei os PDF das notas e comentei a linha "TACBrNFe( TNotasFiscais( Collection ).ACBrNFe ).DANFE.ImprimirDANFEPDF(NFe);" da procedure "NotaFiscal.EnviarEmail", como os PDF já estavam gerados, não precisava gerar novamente. Neste caso o envio do e-mail funcionou para ambas as notas, mas isso também não é a solução, pois se o PDF não estiver gerado vai dar outro erro. 6 - Tentei contornar o caso 5, escrevendo em uma mesma procedure, a chamada para imprimir o PDF e depois para enviar o email, mas ainda assim deu o erro 7- Testei criando o ACBrNFe em tempo de execução e depois do envio do e-mail fazendo a liberação da memória, mas o erro persistiu Os casos 3 e 5 foram os únicos que não houve erro ao enviar o e-mail com PDF no anexo, sendo que o caso tem a questão do TLS ser sempre FALSE e no caso 5, o Usuário terá que gerar o PDF antes e depois enviar o e-mail, ou seja fazer o processo em duas etapas Será que alguém já passou por isso? Gostaria de uma solução mais definitiva Obrigado

Bom dia a todos. Verifiquei em todos os posts sobre esse problema e de fato não consegui uma solução para situação que ocorre no meu caso. Tenho um cliente que utiliza a configuração de email usando um servidor de SMTP local, ficando o SMPT com um endereço IP local. Fiz todos os testes utilizando o demo ACBrNFSe. Investigando o problema (com os fontes do ACBr atualizados), cheguei nas seguintes conclusões: => unit smtpsend -> function TSMTPSend.Login: Boolean - seta a var "FAuthDone": "if" que inicia na linha 450 até a linha 465 . tenta com FindCap('AUTH ') e FindCap('AUTH=') . no entanto, dentro da função "FindCap", a lista FESMTPcap não contem os termos AUTH ou AUTH= (conforme fig. em anexo), retornando sempre '' e ficando a var "FAuthDone" com valor "False" não validando o login de acordo com o código mostrado abaixo (que faz a chamada para função "Login") => unit ACBrMail -> procedure TACBrMail.SendMail - faz a validação do login - "for" que inicia na linha 690: for vAttempts := 1 to fAttempts do begin if fSMTP.Login and fSMTP.AuthDone then Break; if vAttempts >= fAttempts then SmtpError('SMTP Error: Unable to Login.'); end; . a var "fSMTP.AuthDone" acaba ficando sempre com "false" (de acordo com o mostrado acima), invalidando o login e retornando sempre 'SMTP Error: Unable to Login.' . OBS.: se comentar a verificação "fSMTP.AuthDone" deixando apenas "if fSMTP.Login then ..." ai o email é enviado normalmente (tanto com como sem a conexão TLS). Enfim, acredito que esteja faltando tratar alguma situação na carga da lista FESMTPCap nesses casos de configuração de email utilizando um servidor de SMTP local por IP; por favor, alguém poderia me ajudar nessa questão para entender e realizar esse ajuste? Aguardo um retorno, obrigado. André Luis.

Estou tentando enviar um arquivo xml via e-mail utilizando o componente ACBR. Fiz todas as configurações necessárias para o envio, como segue a baixo: ACBrNFe1.EnviarEmailEvento( CdsConfig_EmpresaEMAIL_SMTP.AsString , IntToStr(CdsConfig_EmpresaEMAIL_PORTA.AsInteger) , CdsConfig_EmpresaEMAIL_USUARIO.AsString , CdsConfig_EmpresaEMAIL_SENHA.AsString , CdsConfig_EmpresaEMAIL_USUARIO.AsString , '[email protected]' // ToDo - Rever conceitos para pegar o e-mail do cliente no banco de dados! , '' // ToDo - Rever conceitos para pegar assunto via edit! , vaMensagem // ToDo - Rever conceitos para pegar mensagem via edit! , vaSSL // SSL - Conexão Segura , False // Enviar PDF junto , vaCC // Lista com emails que serão enviado cópias - TStrings , vaEvento // Lista de anexos - TStrings , False // Pede confirmação de leitura do email , False // Aguarda Envio do Email(não usa thread) , 'ACBrNFe2' // Nome do Rementente , vaSSL); // Auto TLS vaEvento.Free; Porem ao enviar esta dando o seguinte erro: SMTP ERROR: Login:???-Other undefined Status. As configurações de SMTP, Login e senha estão configurados em meu banco de dados, o e-mail configurado para envio das mensagens e um gmail. Servidor SMTP: smtp.gmail.com Porta SMTP: 25 Atenção: para enviar e-mails pelo Gmail é necessário copiar para o diretório do programa 2 arquivos: libeay32.dll e ssleay32.dll. Também é necessário Configurando o POP no GMail. Tudo isso foi configurado! Se algum estiver com o mesmo problema e souber uma solução, estou no aguardo!!!