Ver Mensaje Individual
  #1  
Antiguo 09-05-2007
marcial marcial is offline
Miembro
 
Registrado: may 2003
Posts: 147
Reputación: 21
marcial Va por buen camino
Question Recibir Mensajes de Correo

Hola a todos:

Utilizo D5 y el componente NMPOP3 de la pestaña "FastNest" para recibir correos y mi problema es el siguiente:

Para recuperar el texto del mensaje recuperado hago lo siguiente:

Código Delphi [-]
procedure TForm1.NMPOP31RetrieveEnd(Sender: TObject);
begin
  Memo1.Text := NMPOP31.MailMessage.Body.Text;
end;

Adjunto un fichero (002.bmp) y en el memo obtengo esta maravilla que os adjunto y que me tiene un poco de los nervios:

Código:
------=_NextPart_001_0004_01C79269.864F8C10
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable

ffffffffffffffffffffff  *******Sólo este es el mensaje que yo escribo*******
------=_NextPart_001_0004_01C79269.864F8C10
Content-Type: text/html;
	charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=3DContent-Type content=3D"text/html; =
charset=3Diso-8859-1">
<META content=3D"MSHTML 6.00.2900.2180" name=3DGENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=3D#ffffff>
<DIV><FONT face=3DArial =
size=3D2>ffffffffffffffffffffff</FONT></DIV></BODY></HTML>

------=_NextPart_001_0004_01C79269.864F8C10--


File "002.BMP" extracted
Yo solo quiero que aparezca el mensaje que es: "ffffffffffffffffffff" y no todo esto que me aparece. ¿Creeis que tiene algo que ver que adjunte o no un archivo?

Sabría alguien por que me pasa esto.

Muchas gracias por vuestro tiempo e interés

Marcial

Última edición por dec fecha: 09-05-2007 a las 20:27:19.
Responder Con Cita