Importando XML direto do anexo do email

[Infoel]

Estamos desenvolvendo uma rotina em que o cliente não precise ficar descompactando/salvando/procurando/abrindo arquivos xml para importar e dar entrada em seu estoque.

Importamos perfeitamente arquivos xml no acbr e daí fazemos a leitura dos dados.

Mas quando recebo o arquivo por email, direto no aplicativo, através dos componentes Indy TidPop3 e TIdAttachment salvando o arquivo no hd e depois abrindo no AcBR, este acusa muitos erros.

Descobri que o comp Indy inclui quebras de linhas no xml antes de salvar, inlcuisve quedas dentro das tags.

Tentei remover ou substituir mas os erros continuam.

Exemplo: 4543#$A#$DF>

Neste caso não dá pra substituir porque ficaria assim:

4543F>

Exemplo:

Neste caso não posso remover porque ficaria assim:

Alguem sabe alguma forma de configurar o Indy para não incluir quebras de linha?

[igor]

estranho que ele substituiu um espaco em branco com quebra de linha (no seu segundo exemplo)

está certo isso mesmo????

[Angelo Gomes]

Ja tive problema com isso, mas no meu caso era padrão, sempre quebra de linha e um espaço, ou ao contrário, não lembro.

Anexe um xml desse com problema.

[hleorj]

Estamos desenvolvendo uma rotina em que o cliente não precise ficar descompactando/salvando/procurando/abrindo arquivos xml para importar e dar entrada em seu estoque.

Importamos perfeitamente arquivos xml no acbr e daí fazemos a leitura dos dados.

Mas quando recebo o arquivo por email, direto no aplicativo, através dos componentes Indy TidPop3 e TIdAttachment salvando o arquivo no hd e depois abrindo no AcBR, este acusa muitos erros.

Descobri que o comp Indy inclui quebras de linhas no xml antes de salvar, inlcuisve quedas dentro das tags.

Tentei remover ou substituir mas os erros continuam.

Exemplo: 4543#$A#$DF>

Neste caso não dá pra substituir porque ficaria assim:

4543F>

Exemplo:

Neste caso não posso remover porque ficaria assim:

Alguem sabe alguma forma de configurar o Indy para não incluir quebras de linha?

Tente algo parecido conforme a minha rotina

procedure TGerenciar.SalvarNnfeCCe( sNome:String;sDocumento: Widestring );

Var

sArquivo : TextFile;

begin

//

// Cria a pasta em versoes futuras

if not DirectoryExists(PastaNfeCc) then ForceDirectories(PastaNfeCc);

AssignFile(sArquivo, PastaNfeCc + sNome +'-cce.xml');

Rewrite( sArquivo);

Write( sArquivo, AnsiToUTF8(sDocumento) );

CloseFile(sArquivo);

end;

Nos de feed

[Infoel]

Pessoal, eu descobri.

O Problema está no programa cliente de email, no meu caso no Windows Live Mail.

Tem uma configuração que coloca quebras de linhas automáticas no texto da mensagem.

De alguma forma isto está afetando também os anexos com formato texto.

Basta ir em

Menu/Opções/Email/Aba Enviar/Configurações de texto sem formatação das mensagem

Coloquei o formato da mensagem como MIME e codificar texto usando Base 64.

O Problema é que sempre que isso acontecer vamos ter que informar o remetente do email a mudar essas configurações

caso estejam usando o WLM.

[Humberto S. Reis Jr]

Pessoal, bom dia.

 

Sou novo no forum e gostaria de obter exemplos de como usar o componente para importar XML de fornecedores. Aonde posso encontrá-los?

 

Grato a todos.

[walter faria]

Pessoal, eu descobri.

O Problema está no programa cliente de email, no meu caso no Windows Live Mail.

Tem uma configuração que coloca quebras de linhas automáticas no texto da mensagem.

De alguma forma isto está afetando também os anexos com formato texto.

Basta ir em

Menu/Opções/Email/Aba Enviar/Configurações de texto sem formatação das mensagem

Coloquei o formato da mensagem como MIME e codificar texto usando Base 64.

O Problema é que sempre que isso acontecer vamos ter que informar o remetente do email a mudar essas configurações

caso estejam usando o WLM.

Boa noite, teria como compartilhar como voce salva o seu anexo diretamente do email com delphi?

[Infoel]

Walter

Voce precisa criar um aplicativo básico cliente de email, usando os componentes Indy TIdPOP3 e TIdMessage;

É bem simples de usar, e tem exemplos de uso desses componentes no próprio Delphi.

 

O Algorítmo também é bem simples:

-Checar conta de email

-Receber mensagem

-Verificar se tem anexo

-Verificar se anexo tem extensao XML

-Salvar arquivo XML

-Carregar arquivo XML no AcbrNFe

-Percorrer a propriedades do Acbr e salvar informações no banco de dados.