Lo que hago es descargar los correos a un fichero y luego procesarlo con :
- Code: Select all Expand view
oMail := TIPMail():New()
oMail:FromString( cFichero )
While oMail:GetAttachment() != NIL
// Creo el fichero adjunto en el disco
cDatos:=oMail:NextAttachment():GetBody()
nFichero:=fCreate(cDirTemp+cFile)
fWrite(nFichero,cDatos)
fClose(nFichero)
Enddo
He colgado el fichero conteniendo el correo a procesar (http://www.sigev.com/email_354.eml) por si alguno tenéis más experiencia con estos temas.
Muchas gracias.