Hi Yuri
the one i found required referencing a specific software application (chilkat) so the code didn't take me very far - i was wondering if something was packaged with VFP - Chilkay also looked like it was taking me to place i didn't particularly want to go. At any rate here is a copy of it.
thanks for your reply Yuri
k
LOCAL loMailMan, loEmail, loBundle, lnSuccess, lcSummary
loMailman = CreateObject('Chilkat.MailMan2')
loMailman.UnlockComponent('unlock_code')
loMailman.MailHost = 'mail.chilkatsoft.com'
loMailman.PopUsername = 'matt'
loMailman.PopPassword = 'myPassword'
loBundle = loMailman.CopyMail()
FOR i = 0 TO loBundle.MessageCount-1
loEmail = loBundle.GetEmail(i)
=loEmail.SaveXml("email" + LTRIM(STR(i)) + ".xml")
lcSummary = "From: " + loEmail.From + CHR(13)+CHR(10)
lcSummary = lcSummary + "Subject: " + loEmail.Subject + CHR(13)+CHR(10)
lcSummary = lcSummary + "Date: " + DTOS(loEmail.LocalDate) + CHR(13)+CHR(10)
lcSummary = lcSummary + "Attachments: " + STR(loEmail.NumAttachments) + CHR(13)+CHR(10)
lcSummary = lcSummary + "Body: " + loEmail.Body
=MESSAGEBOX(lcSummary)
RELEASE loEmail
NEXT
RELEASE loMailman, loBundle
RETURN .T.