Pesquisar na Comunidade

Boa tarde, vi alguns problemas semelhantes ao meu, mas todos resolvidos usando os componentes Delphi, e uso o ACBrMonitor Plus1.2.0.18. Quando faço o envio do PDF e XML da nota por email, através do sistema da empresa pelos comandos TXT do ACBrMonitor, no gmail o XML não aparece como anexo, apenas no corpo da mensagem. Daí fui em "Mostrar Original" no gmail e lá consta o seguinte: --005432F3_08A59F45_Synapse_boundary Content-type: text/xml; name="42190107608242000101550010000033101394194342-nfe.xml" Content-Transfer-Encoding: Base64 Content-Disposition: inline; FileName="42190107608242000101550010000033101394194342-nfe.xml" Content-Description: 42190107608242000101550010000033101394194342-nfe.xml Depois eu olhei o email da NFe de algumas outras empresas e percebi que ali onde diz inline, está attachment. Eu vi em algumas postagens aqui no fórum que a galera alterou a propriedade do anexo para attachment também. Fiz um teste com o "Enviar Email" através da opção Teste, na Aba DF-e. Selecionei o XML e informei o meu email, daí deu certo. Fui verificar o "Mostrar Original" no GMAIL e estava assim: --010C4FDB_4B983502_Synapse_boundary Content-type: text/xml; name="42170707608242000101550010000054501307719415-nfe.xml" Content-Transfer-Encoding: Base64 Content-Disposition: attachment; FileName="42170707608242000101550010000054501307719415-nfe.xml" Content-Description: 42170707608242000101550010000054501307719415-nfe.xml Tem como eu fazer isto através dos comandos do ACBrMonitor? Faço uso do EMAIL.Enviar, do NFE.EnviarEmail e do NFE.EnviarEmailEvento. Não encontrei nada no manual. Ou talvez eu esteja com uma versão um pouco antiga do ACBrMonitor. Minha versão é 1.2.0.18. Desde já agradeço!!

Pessoal, Como faço para gerar um link em html para um arquivo PDF anexado no próprio email? É possivel?

Boa tarde a todos, Estou enfrentando uma situação para o envio de email pelo ACBrMail, com anexos compactados no formato zip. Quando dou o ADD para adicionar os anexos, funciona normal, ou seja, adiciona normalmente os anexos no componente. Entretanto, quando dou o SEND para enviar o email, o componente informa que não encontrou os arquivos dos anexos. Cabe lembrar aqui que os anexos possuem NOMES LONGOS ...será que o componente só aceita nomes curto (8:3) ?? NELSON SANTOS

Boa tarde!! Não sei bem se é um problema, mas ocorre o seguinte. Estou usando o comando NFe.EnviarEmailEvento(cEmailDestino,cArqXMLEvento,[cArqXMLNFe],cEnviaPDF,[cAssunto],[cEmailsCopias],[cAnexos]) que está no help do ACBr, para enviar cartas de correção, mas eu queria anexar junto o xml da NFe. Como está ali no comando, é só anexar e bala! Porém não vai junto como anexo no email, apenas vai o xml do evento, o pdf do evento e o pdf da NFe que coloquei como anexo adicional para testar. Segue abaixo meu comando. Não uso Delphi, estou usando a opção de Monitorar por TXT. Testei na versão disponibilizada para todo mundo aqui na seção de downloads e compilei uma ontem, ambas não enviaram o xml da NFe. NFe.EnviarEmailEvento("[email protected]","C:\_GPSNFE\XML\1101114216071310216600016055001000010238128910598901-procEventoNFe.xml","C:\_GPSNFE\XML\42160713102166000160550010000102381289105989-nfe.xml",1,"CANCELAMENTO NF-e Nr. [NumeroNF] - [EmitFantasia]","[email protected];[email protected];[email protected];[email protected]","C:\_GPSNFE\PDF\42160713102166000160550010000102381289105989-nfe.PDF"). E o retorno do ACBr. OK: Email enviado com sucesso Anexei junto o log. Está bem grande, mas os teste de envio do evento estão no final. LOG.TXT

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;