Sample code for 30+ languages & platforms
Lianja

Fetch an IMAP Message's MIME into a BinData

See more IMAP Examples

Demonstrates the Chilkat Imap.FetchSingleBd method, which downloads one message's MIME bytes into a BinData object. If the second argument (bUid) is true, the first argument is a UID; otherwise it is a sequence number. This example downloads message 1's MIME into a BinData and prints the byte count.

Background: This is the binary counterpart to FetchSingleAsMime (which returns a string). A BinData holds raw bytes, so it preserves the message exactly — the right choice when you plan to write the MIME straight to a file, hash it, or hand it to an API expecting a byte buffer, with no charset conversion that could alter binary content.

Chilkat Lianja Downloads

Lianja
llSuccess = .F.

//  Demonstrates the Imap.FetchSingleBd method, which downloads one message's MIME bytes into a
//  BinData object.  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's MIME bytes into a BinData.  bUid = .F..
loBdMime = createobject("CkBinData")
llSuccess = loImap.FetchSingleBd(1,.F.,loBdMime)
if (llSuccess = .F.) then
    ? loImap.LastErrorText
    release loImap
    release loBdMime
    return
endif

? "MIME size (bytes) = " + str(loBdMime.NumBytes)

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



release loImap
release loBdMime