Pesquisar na Comunidade

Bom dia, estou com um problema em um cliente, quando ele tenta enviar uma nfe por e-mail o acbrmonitor trava, reinicializando ele e deixando aberto consegue, ja desabilitei o antivirus, o firewall, as vezes funciona, as vezes não. Segue em anexo o log. No log, no dia 26/08/2022 as 10:18 mostra o que acontece. Segue tambem print da tela. LOG.TXT

Tem alguns dias que me relataram que não está indo o corpo do email, quando fui testar realmente não foi e estava funcionando bem. Eu consegui enviar o corpo do email, mas para isto que mudar a propriedade IsHTML para TRUE e antes funcionava com FALSE. O problema é que o texto agora não está indo com quebra de linha, qualquer texto que coloque no body vai tudo em uma única linha sem quebra de linha. Como faço para colocar quebra de linha no BODY? ACBrMail.Body.Text := MmTexto.Text; //Vai sem quebra de linha for I := 1 to MmTexto.Lines.Count do //Também vai sem quebra de linha ACBrMail.Body.Add(MmTexto.Lines[I]); ACBrMail.IsHTML := True; //No exemplo acima o MmTexto.Text é um memo com quebra de linha no texto.

Bom dia, Gostaria de saber como vocês fazem quanto ao envio dos documentos fiscais por e-mail aos destinatário. Aqui configuramos o próprio e-mail do cliente para realizar o envio, daí cada um possui um provedor, Outlook, Hotmail, GMail, Uol. Na maioria dos casos funciona muito bem, porém em alguns clientes após um tempo de uso o provedor bloqueia este envio por entender que possam ser spam, algumas vezes conseguimos desbloquear mas após mais um tempo de uso o bloqueio volta. O que me indicariam? Qual provedor ou serviço de e-mail vocês trabalham? Desde já, obrigado!

O e-mail chega perfeitamente no destino, porem o texto da mensagem não aparece no corpo do e-mail. Utilizo com o envio de mensagens diversas de acordo com o posicionamento do pedido. Utilizo o envio de anexos (isto está 100%). Transcrevo abaixo o trecho do LOG referente ao envio da mensagem. Elcio Pereira Comtel Informática EMAIL.Novo OK: Novo E-mail iniciado! Email.ConfirmarLeitura (True) OK: Email.AdicionaPara ("[email protected]") OK: E-mail [email protected] adicionado a lista "Para". Email.Assunto ("Teste de e-mail") OK: Email.TextoMensagem ("Prezado usuário.<p></p>Segue anexo a Nota fical Eletrônica no formato XML, bem como a representação DANFE no formato PDF.<br>Sugerimos que seja feito a verificação de autenticidade no site da Secretaria da Fazenda, no seguinte endereço:<p></p>www.nfe.fazenda.gov.br<p></p><p></p>Atenciosamente,<p></p><p>Comtel Informatica") OK: Email.Enviar OK: E-mail enviado com sucesso! 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

Boa tarde ! Monto um lote de boletos de variados clientes com diversos títulos, enviando separadamente um a um. Acontece que por exemplo o cliente fez a compra em 5 parcelas , como esta hoje, envia 5 e-mail..... Alguém sabe de como fazer para que o PDF imprima as 5 parcelas em único arquivo , enviado assim apenas 1 e-mail para o cliente ? Lembrando que os boletos são impresso na ordem de liberação , seguindo a ordem também das parcelas . Exemplo: 100/1-5, 100/2-5 .... 100/5-5.

Boa noite pessoal! Trabalho com os comandos .txt Tenho a seguinte questão! tenho 3 empresas onde gero as NFes, e no momento de enviar o XML ao cliente . Até hoje venho trabalhando com um único e-mail... preciso setar o e-mail da empresa correspondente no arquivo ACBRMonitor.ini via comandos .txt que acredito ser a seção NomeExibicao=Nome da empresa [email protected] Email=smtp.nfeteste.com.br Usuario=43094i3dfmf,dfm Senha=flksadlfksd349304 Porta=465 ExigeSSL=1 ExigeTLS=1 Codificacao= AssuntoNFe= MensagemNFe= AssuntoCTe= MensagemCTe= AssuntoMDFe= MensagemMDFe= Confirmacao=1 SegundoPlano=0 Existe algum comando apropriado para fazer esta configuração, ou somente editando o ACBRMonitor.ini e alterando cada atributo de interesse. Obrigado!

Bom dia a todos, por favor preciso de ajuda novamente, o tema em questão agora é envio de vários títulos de uma vez... estamos usando o comando "BOLETO.EnviarEmail" e estamos identificando o Sacado.Email em cada titulo porem so é enviado um único titulo de cada processo segue anexo titulos para analise agradeço a todos, abraço, Cristiam titulos.txt

Boa tarde desde que atualizei minha versão do Delphi para o Delphi tokyo estou tendo problemas com o encoding dos arquivos XML de NF-e anexados por e-email utilizando o componente ACBR. Já entrei em contato com a Embarcadeiro e a mesma informou que o problema não esta na nova versão. Fiz um teste, implementei o envio de e-mail utilizando os componentes nativos do Delphi e enviou corretamente. Já atualizei meu ACBR. Alguém saberia me dizer como corrigir o problema ? Estou enviando um XML de uma NF-e em anexo pra que quem puder ajudar possa testar corretamente. Assim que enviarem o XML por e-mail, tentem abrir ele no Navegador, será apresentado um erro de encoding, desta forma meus clientes não conseguem importar o XML gerado por meu sistema. NFE.xml

Olá Utilizo os métodos ACBrNFe1.EnviarEmail e ACBrNFe1.EnviarEmailEvento Ambos funcionam perfeitamente Porém notei a existência de um botão "Enviar" no ACBrNFeDANFeRL Ele está desabilitado, como proceder para utiliza-lo? Obrigado

Em testes com o ACBrValidador foi constatado que está passando o e-mail com esta formatação "marcelo @teste.br" não está testando se tem um espaço entre os caracteres da string. Baseado nisso fiz uma alteração na unit ACBrValidador.pas, segue a mesma para análise. linha alterada 831, adicionado espaço na lista de caracteres inválidos: ACBrValidador.pas

Bom dia! Estou trabalhando na otimização de um processo de envio de DACTe por e-mail, nesse processo notei uma lentidão na execução da procedure "TACBrCTeDACTEFR.ImprimirDACTEPDF" apos uma análise vi que o laço FOR esta sendo executado sem necessidade. Quando carrego o componente com mais de um CT-e ele constrói o PDF com mais de uma DACTe, perfeito, porem com o laço ele faz o processo repetidamente de acordo com a quantidade de CT-e carregados. Segue o código citado e em anexo a UNIT corrigida. Unit ACBrCTeDACTEFR procedure TACBrCTeDACTEFR.ImprimirDACTEPDF(ACTE: TCTe); begin ... try frxPDFExport.ShowDialog := False; for i := 0 to TACBrCTe(ACBrCTe).Conhecimentos.Count - 1 do // O LAÇO FOR FOI REMOVIDO begin frxPDFExport.FileName := IncludeTrailingPathDelimiter(PathPDF) + OnlyNumber(CTE.infCTe.Id) + '-cte.pdf'; if not DirectoryExists(ExtractFileDir(frxPDFExport.FileName)) then ForceDirectories(ExtractFileDir(frxPDFExport.FileName)); frxReport.Export(frxPDFExport); end; finally frxPDFExport.ShowDialog := OldShowDialog; end; ... end; Grato e aguardando retorno. ACBrCTeDACTEFR.pas

Bom dia Pessoal! Estou com problemas no envio de e-mail. Estava funcionando corretamente até outro dia, porém recentemente meus clientes começaram e ter problemas. O e-mail é enviado normalmente, inclusive chega até os destinatários. Porém no "Texto" do e-mail eu recebo a seguinte mensagem --003E4FE2_4DE6F1BE_Synapse_boundary-- . Os numeros iniciais sempre mudam a cada e-mail. Alguem sabe como proceder? Isso já foi corrigido? Obrigado.

Olá, bom dia, acabei de atualizar para o trunk2 e me deparei com um problema no envio de boletos por e-mail. if cb_Eml.checked then begin // configuração componente envio e-mail ACBrMail1.Username:=dm.cdsEmpE_USER.AsString; ACBrMail1.Password:=Dm.cdsEmpE_PASS.AsString; ACBrMail1.Port:=dm.cdsEmpE_PORT.AsString; ACBrMail1.Host:=dm.cdsEmpE_SMTP.AsString; ACBrMail1.SetSSL:=iif(Dm.cdsEmpE_RAUT.AsString='N',false,true); ACBrMail1.SetTLS:=false; mProgress_Add('Processando Documento','Eviando e-mail: '+ iif(cdsGerEMLCOB.AsString<>'',cdsGerEMLCOB.AsString, cdsGerEMLAGT.AsString),1); //Envia Email para EMLCOB (caso não tenha EMLAGT) try ACBrBoleto1.EnviarEmail(iif(cdsGerEMLCOB.AsString<>'', cdsGerEMLCOB.AsString,cdsGerEMLAGT.AsString), cdsCCRE_ASST.AsString,DBMemo1.Lines,true,nil,nil); quando eu vou enviar, ele para nessa parte, if not Assigned(FMAIL) then raise Exception.Create( ACBrStr('Componente ACBrMail não associado') ); Se alguém puder me ajudar ai, sou iniciante em delphi e foi me passada essa tarefa

Olá amigos, estou com problemas ao enviar e-mail utilizando o ACBRNFeMonitorPlus, mostra a mensagem "SMTP Error: Unable to Login." Preciso de ajuda para saber onde estou errando para configurar, estou utilizando a versão 0.1.12.9 Segue anexo o print do Teste do botão "Testar Configuração".

Oi Pessoal, é o seguinte, já pesquisei e vi várias coisas sobre erros semelhantes, mas o que vi não se encaixa no problema que estou tendo. no ACBRMonitor na aba email o email deve estar com a seguinte configuração (configuração que no outlook do cliente funciona corretamente) Servidor SMTP: mail.servidordocliente.com.br porta: 587 usuário: nfe.cliente => (*) senha: ******* Tipo Envio: Synapse (checkBox de cima os 2 desclicados.) (*) = aqui que está o problema... normalmente se coloca o e-mail completo do cliente, só que neste caso, o email é [email protected] mas o username é nfe.cliente. Isto até nem é uma coisa tão rara assim. e como falei antes funciona nos servidores de e-mail normalmente. Erro ao enviar email : SMTP ERROR: MailFrom:???-Other undefined Status 554 mailfrom without @ is administratively denied Agradeço a ajuda que puderem me fornecer.

Boa tarde, Foi trocado o nome com que é salvo o arquivo PDF da NFe de acordo com a Nota Técnica ACBR 2014/001. Porém na hora de enviar a NFe por e-mail anexando o xml e o pdf não é possível localizar o arquivo PDF gerado, pois o mesmo procura com o nome antigo Segue abaixo unit ACBrNFeNotasFiscais; procedure EnviarEmail(const sSmtpHost, sSmtpPort, sSmtpUser, sSmtpPasswd, sFrom, sTo, sAssunto: String; sMensagem: TStrings; SSL: Boolean; EnviaPDF: Boolean = True; sCC: TStrings = nil; Anexos: TStrings = nil; PedeConfirma: Boolean = False; AguardarEnvio: Boolean = False; NomeRemetente: String = ''; TLS : Boolean = True; UsarThread: Boolean = True; HTML: Boolean = False); if (EnviaPDF) then begin if TACBrNFe( TNotasFiscais( Collection ).ACBrNFe ).DANFE <> nil then begin TACBrNFe( TNotasFiscais( Collection ).ACBrNFe ).DANFE.ImprimirDANFEPDF(NFe); //erro tenta anexar o pdf mais não localiza o arquivo NomeArq := StringReplace(NFe.infNFe.ID,'NFe', '', [rfIgnoreCase]); NomeArq := StringReplace(NFe.infNFe.ID,'NFe', '', [rfIgnoreCase]); NomeArq := NomeArq + '-nfe'; // nota técnica acbr 2014/001 adicionou -nfe na frente da chave NomeArq := PathWithDelim(TACBrNFe( TNotasFiscais( Collection ).ACBrNFe ).DANFE.PathPDF)+NomeArq+'.pdf'; AnexosEmail.Add(NomeArq); end; end;

Boa tarde, pessoal. Tive o problema retratado neste tópico qual dentro de um bloco Try/Except não conseguia capturar caso ocorria uma exception dentro da Thread. Implementei o envio "normal" como também existe na unit do CT-e. Espero ter colaborado Abraços Gustavo Kato ACBrBoleto.pas

Implementado comando EMAIL com base no componente ACBrMail (ver arquivo de ajuda do ACBrMonitor, atualizado). Também, agora, o comando BOLETO.IncluirTitulos aceita como tipo de saída o parâmetro "E" (ver ajuda) que gera um arquivo PDF com os boletos existentes na lista de títulos e envia como anexo para o e-mail do Sacado. Foi incluido, ainda, o comando BOLETO.EnviarEmail , que similar ao acima, gera um arquivo PDF com os boletos existentes na lista de títulos e envia como anexo para o e-mail do Sacado. Atualize pelo SVN. Lembrando que, a próxima versão do ACBrMonitor de compilação semanal, e disponível aos usuários do SAC, já terá essas funcionalidades.

Boa tarde, No evento EnviarEmailEvento ví que o XML não é enviado, até tentei aqui mas não entendi direito o padrão das classes. Seria possível a implementação? Obrigado Gustavo Kato

Boa tarde senhores. Fiz uma correção onde havia a variável no envio de email com thread e no envio normal não existia, então fiz a inclusão e por default está "false", agora nas duas opções aceita o envio de e-mail com html no corpo. Segue anexo ajuste. Gostaria que assim possível subisse essa alteração. brigado pela atenção. ACBrNFe2.rar

Boa tarde pessoal. Estou implementando uma rotina para envio de faturas comerciais em massa, por e-mail. Para tal, utilizo os componentes TACBrBoleto e TACBrBoletoFCFR. Ao executar o procedimento TACBrBoleto.EnviarEmail, o componente mostra a tela de setup da exportação do PDF, o que não é de meu interesse. Reparei que existe a propriedade 'MostrarSetup', mas a finalidade dela parece estar restrita apenas ao diálogo de impressão, e não ao de exportação. Debugando o programa, cheguei ao procedimento TACBrBoletoFCFR.Imprimir, no qual o TDataModule responsável pela impressão é criado em tempo de execução (DmBoleto). Isto impede qualquer alteração dos dados nele contidos fora do contexto do procedimento (no código do aplicativo): procedure TACBrBoletoFCFR.Imprimir; var DmBoleto: TdmACBrBoletoFCFR; begin inherited Imprimir; // Verifica se a lista de boletos está vazia DmBoleto := TdmACBrBoletoFCFR.Create(Self); ... Logo após, a propriedade 'MostrarSetup' é aplicada nas opções de impressão do report: frxReport.PrintOptions.ShowDialog := MostrarSetup; E, finalmente, o momento da exportação do arquivo: frxPDFExport.FileName := NomeArquivo; {Esta é a linha que está resolvendo o impasse, por enquanto} DmBoleto.frxPDFExport.ShowDialog := MostrarSetup; frxReport.Export(DmBoleto.frxPDFExport); Gostaria de saber dos colegas se há alguma outra forma de contornar isto. Caso não haja, como proceder para aplicar esta solução no projeto? É interessante criar outra propriedade específica para este fim? Desde já agradeço a atenção, Gabriel.

Bom dia Senhores. Precisei realizar uma alteração no envio de e-mail Normal (TACBrNFe.EnviarEmailNormal) "HTML:Boolean=false". Tive essa necessidade devido a ter e-mails personalizados para cada cliente. Gostaria de um retorno pra saber em qual versão sairá essa alteração para que eu atualize meu Acbr. Segue em anexo as Units alteradas. Obrigado a todos pela atenção. ACBrNFe2.rar

Olá, estou com problemas no envio de notas por e-mail em certos clientes. O problema é que a Danfe que vai juntamente com o xml em anexo está com o tamanho muito maior que o normal e o e-mail demora muito tempo para ser enviado. Por exemplo com o tamanho de 7,4 MB. Em outros clientes a Danfe anexada tem o tamanho de 120 KB por ai mais ou menos e o envio do e-mail é rápido. Utilizo os componentes AcbrNFe e o AcbrNFeDANFeRL. Realizo o envio do email através do método: ACBrNFe.NotasFiscais.Items.EnviarEmail(); Além disso, fiz um teste, salvei uma Danfe em .PDF e nesses clientes com o problema ela também salva com esse tamanho em MB e nos que não tem o problema salva em KB Tentei ver se é alguma coisa de configuração de resolução do Adobe Reader, mas não achei nada. Interessante que em um cliente, num computador Windows XP, salvei a Danfe e foi salva com 7,4 MB e em um outro computador com Windows 7, salvei a mesma Danfe e ela foi salva com 112 KB. Alguém já passou por isso ou tem alguma noção do que pode ser? desde já agradeço.