Sample code for 30+ languages & platforms
Lianja

Fetch an IMAP Message as MIME Text

See more IMAP Examples

Demonstrates the Chilkat Imap.FetchSingleAsMime method, which downloads one message and returns its MIME source as a string. If the second argument (bUid) is true, the first argument is a UID; otherwise it is a sequence number. This example fetches message 1's raw MIME.

Background: Sometimes you want the message exactly as it exists on the server — the raw MIME — rather than a parsed Email object. That is what you save to a .eml file, feed to another parser, or archive verbatim. This method returns the MIME as text; for messages that may contain binary data, the BinData variant FetchSingleBd preserves the exact bytes.

Chilkat Lianja Downloads

Lianja
llSuccess = .F.

//  Demonstrates the Imap.FetchSingleAsMime method, which downloads one message and returns
//  its MIME source as a string.  If the 2nd argument (bUid) is .T., the 1st argument is a
//  UID; otherwise it is a sequence number.

loImap = createobject("CkImap")

loImap.Ssl = .T.
loImap.Port = 993

llSuccess = loImap.Connect("imap.example.com")
if (llSuccess = .F.) then
    ? loImap.LastErrorText
    release loImap
    return
endif

llSuccess = loImap.Login("user@example.com","myPassword")
if (llSuccess = .F.) then
    ? loImap.LastErrorText
    release loImap
    return
endif

llSuccess = loImap.SelectMailbox("Inbox")
if (llSuccess = .F.) then
    ? loImap.LastErrorText
    release loImap
    return
endif

//  Download message sequence number 1 and return its raw MIME.  bUid = .F..
lcMime = loImap.FetchSingleAsMime(1,.F.)
if (loImap.LastMethodSuccess = .F.) then
    ? loImap.LastErrorText
    release loImap
    return
endif

? lcMime

llSuccess = loImap.Disconnect()
if (llSuccess = .F.) then
    ? loImap.LastErrorText
    release loImap
    return
endif



release loImap