PC SOFT

FORUMS PROFESSIONNELS
WINDEVWEBDEV et WINDEV Mobile

Accueil → WINDEV 25 → Problema na Exibição de Conteúdo de e-mail recebido
Problema na Exibição de Conteúdo de e-mail recebido
Débuté par Bastiaan, 03 jan. 2018 15:35 - 1 réponse
Membre enregistré
37 messages
Popularité : +5 (5 votes)
Posté le 03 janvier 2018 - 15:35
Prezados

Estou com problemas na exibição de conteúdo da mensagem de e-mails recebidos.

Estou armazenando o conteúdo de e-mails recebidos e salvando em uma tabela em uma campo text memo. (vide abaixo)
Hreset(E_mails)
E_Mails.Content=MyMessage.Message
Hadd(E_mails)

Posteriormente estou recuperando estas informações e exibindo o conteúdo do e-mail usando um campo HTML

EDT_HTML_text=QRY_E_mail_consultado_p_consultar_ou_responder.Content

O problema é que ANTES de exibir o conteúdo no formato correto primeiro é exibido o conteúdo de uma forma estranha vide exemplo abaixo :

*Atenção teste de e-mail enviado por gmail* 1. *Iem 1* 2. *item 2 * 3. *item 3* - *teste verifica* -
*teste como ficou* Livre de vírus. www.avg.com . <#DAB4FAD8-2DD7-40BB-A1B8-4E2AA1F9FDF2>
--- Este e-mail foi verificado quanto a vírus pelo AVG. http://www.avg.com

E a seguir vem o conteúdo exibido de forma correta vide exemplo abaixo :

Atenção teste de e-mail enviado por gmail


Iem 1
item 2
item 3
teste verifica
teste como ficou



Alguém saberia como corrigir esta situação ?

Grato

Bastiaan
Membre enregistré
37 messages
Popularité : +5 (5 votes)
Posté le 28 janvier 2018 - 16:18
Acabei descobrindo como resolver este problema

Ao salvar o conteúdo do e-mail ao invés de usar a instrução

Hreset(E_mails)
E_Mails.Content=MyMessage.Message
Hadd(E_mails)

é só usar

Hreset(E_mails)
E_Mails.Content=MyMessage.HTML
Hadd(E_mails)

neste caso o conteúdo da mensagem do e-mail que se está recebendo (MyMessage.Message que vem em plain text ou HTML)

ao substituirmos
E_Mails.Content=MyMessage.Message por E_Mails.Content=MyMessage.HTML, pegamos apenas o conteúdo da mensagem do e-mail no formato HTML, que no caso é o que eu precisava.