Visual FoxPro

Download the Full Version of a Partial Email

Demonstrates the Chilkat MailMan.FetchFull method, which downloads the complete version of a header-only or partial Email and stores it in a second Email. The full result includes the complete body and any attachments, and the partial email must retain its UIDL. This example previews message 1 (headers only) and then downloads it in full.

Background: A common pattern is to download headers first — cheap and fast — show the user a message list, and only pull the full content when a message is actually opened. FetchFull completes that "download on demand" flow: given a partial email (which carries its UIDL), it fetches the rest from the server. This keeps bandwidth and latency low when browsing a large mailbox.

Chilkat Visual FoxPro Downloads

Download Chilkat for Visual FoxPro

Visual FoxPro

LOCAL lnSuccess
LOCAL loMailman
LOCAL loPartialEmail
LOCAL loFullEmail

lnSuccess = 0

*  Demonstrates the MailMan.FetchFull method, which downloads the complete version of a
*  header-only or partial Email and stores it in a second Email.  The full result includes
*  the complete body and any attachments.  The partial email must retain its UIDL.

loMailman = CreateObject('Chilkat.MailMan')

*  Configure the POP3 server connection.
loMailman.MailHost = "pop.example.com"
loMailman.MailPort = 995
loMailman.PopSsl = 1
loMailman.PopUsername = "user@example.com"
loMailman.PopPassword = "myPassword"

*  First fetch message 1 as headers only (a fast preview).  headerOnly=1.
loPartialEmail = CreateObject('Chilkat.Email')

lnSuccess = loMailman.FetchOne(1,0,1,loPartialEmail)
IF (lnSuccess = 0) THEN
    ? loMailman.LastErrorText
    RELEASE loMailman
    RELEASE loPartialEmail
    CANCEL
ENDIF

? "Preview subject: " + loPartialEmail.Subject

*  Now download the complete message (body and attachments).
loFullEmail = CreateObject('Chilkat.Email')
lnSuccess = loMailman.FetchFull(loPartialEmail,loFullEmail)
IF (lnSuccess = 0) THEN
    ? loMailman.LastErrorText
    RELEASE loMailman
    RELEASE loPartialEmail
    RELEASE loFullEmail
    CANCEL
ENDIF

? "Full email NumAttachments: " + STR(loFullEmail.NumAttachments)

*  Note: Explicitly connecting/authenticating is optional.  Chilkat MailMan automatically
*  connects and authenticates -- using the property settings above -- whenever a server
*  operation requires it.  Calling the explicit connect/authenticate methods can still be
*  helpful to determine whether a failure occurs while connecting or while authenticating.

RELEASE loMailman
RELEASE loPartialEmail
RELEASE loFullEmail