DataFlex

Fetch a POP3 Message's Raw MIME by Message Number

Demonstrates the Chilkat MailMan.FetchMimeByMsgnumBd method, which retrieves an email by POP3 message number and stores the raw MIME source bytes in a BinData. Chilkat clears the BinData before downloading. This example fetches message number 1's MIME into a BinData.

Background: This is the message-number variant of FetchMimeBd. It grabs the untouched MIME bytes of a message identified by its 1-based session position — handy when iterating a mailbox by number and archiving or forwarding each message's exact source. Keep in mind message numbers are only valid within the current session, so for stable identification across sessions prefer the UIDL-based FetchMimeBd.

Chilkat DataFlex Downloads

Download Chilkat for DataFlex

DataFlex

Use ChilkatAx-win32.pkg

Procedure Test
    Boolean iSuccess
    Handle hoMailman
    Variant vBdMime
    Handle hoBdMime
    String sTemp1
    Integer iTemp1

    Move False To iSuccess

    //  Demonstrates the MailMan.FetchMimeByMsgnumBd method, which retrieves an email by POP3
    //  message number and stores the raw MIME source bytes in a BinData.  Chilkat clears the
    //  BinData before downloading.

    Get Create (RefClass(cComChilkatMailMan)) To hoMailman
    If (Not(IsComObjectCreated(hoMailman))) Begin
        Send CreateComObject of hoMailman
    End

    //  Configure the POP3 server connection.
    Set ComMailHost Of hoMailman To "pop.example.com"
    Set ComMailPort Of hoMailman To 995
    Set ComPopSsl Of hoMailman To True
    Set ComPopUsername Of hoMailman To "user@example.com"
    Set ComPopPassword Of hoMailman To "myPassword"

    //  Fetch the raw MIME of message number 1 into a BinData.
    Get Create (RefClass(cComChilkatBinData)) To hoBdMime
    If (Not(IsComObjectCreated(hoBdMime))) Begin
        Send CreateComObject of hoBdMime
    End

    Get pvComObject of hoBdMime to vBdMime
    Get ComFetchMimeByMsgnumBd Of hoMailman 1 vBdMime To iSuccess
    If (iSuccess = False) Begin
        Get ComLastErrorText Of hoMailman To sTemp1
        Showln sTemp1
        Procedure_Return
    End

    Get ComNumBytes Of hoBdMime To iTemp1
    Showln "MIME size (bytes) = " iTemp1

    //  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.


End_Procedure