DataFlex

Get the Entire MIME Header Section

Demonstrates the Chilkat Mime.GetEntireHead method, which returns the complete serialized header section of the current entity. It takes no arguments; the body and any multipart child content are not included.

Note: The file paths are relative to the application's current working directory. Absolute paths may also be used. Supply the paths appropriate to your own environment.

Background: This gives you just the headers of the current entity as text — the block above the blank line that separates headers from body. It is convenient for logging or displaying a message's metadata, or for examining the headers without the potentially large body. Its complement is GetEntireBody.

Chilkat DataFlex Downloads

Download Chilkat for DataFlex

DataFlex

Use ChilkatAx-win32.pkg

Procedure Test
    Boolean iSuccess
    Handle hoMime
    String sHeaders
    String sTemp1
    Boolean bTemp1

    Move False To iSuccess

    Get Create (RefClass(cComChilkatMime)) To hoMime
    If (Not(IsComObjectCreated(hoMime))) Begin
        Send CreateComObject of hoMime
    End
    Get ComLoadMimeFile Of hoMime "qa_data/message.eml" To iSuccess
    If (iSuccess = False) Begin
        Get ComLastErrorText Of hoMime To sTemp1
        Showln sTemp1
        Procedure_Return
    End

    //  Return the complete serialized header section of the current entity.  The body and any
    //  multipart child content are not included.
    Get ComGetEntireHead Of hoMime To sHeaders
    Get ComLastMethodSuccess Of hoMime To bTemp1
    If (bTemp1 = False) Begin
        Get ComLastErrorText Of hoMime To sTemp1
        Showln sTemp1
        Procedure_Return
    End

    Showln sHeaders


End_Procedure