(DataFlex) Email Body - Plain Text and/or HTML

Any given email may have a plain-text body, an HTML body, or both. The Body property will return the HTML body by default (if it exists) otherwise it will return the plain-text body. There are methods for checking to see if an email has a particular body (HasPlainTextBody and HasHtmlBody) and there are methods for getting a specific body: GetHtmlBody, GetPlainTextBody.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

Use ChilkatAx-win32.pkg

Procedure Test
    Handle hoEmail
    Boolean iSuccess
    Boolean iBText
    Boolean iBHtml
    String sTemp1

    Get Create (RefClass(cComChilkatEmail)) To hoEmail
    If (Not(IsComObjectCreated(hoEmail))) Begin
        Send CreateComObject of hoEmail
    End

    // Load an email from a .eml

    Get ComLoadEml Of hoEmail "something.eml" To iSuccess
    If (iSuccess <> True) Begin
        Get ComLastErrorText Of hoEmail To sTemp1
        Showln sTemp1
        Procedure_Return
    End

    // Display the default Body:
    Get ComBody Of hoEmail To sTemp1
    Showln sTemp1

    // If a plain-text body is present, display it:

    Get ComHasPlainTextBody Of hoEmail To iBText
    If (iBText = True) Begin
        Get ComGetPlainTextBody Of hoEmail To sTemp1
        Showln sTemp1
    End

    // If an HTML body is present, display the HTML source:

    Get ComHasHtmlBody Of hoEmail To iBHtml
    If (iBHtml = True) Begin
        Get ComGetHtmlBody Of hoEmail To sTemp1
        Showln sTemp1
    End



End_Procedure