DataFlex

Unpack an HTML Email to Files

Demonstrates the Chilkat Email.UnpackHtml method, which unpacks an HTML email into an HTML file plus separate related files (images and style sheets). Links in the HTML are rewritten to reference the unpacked files. The arguments are the unpack directory, the HTML filename, and the subdirectory for the related parts. This example loads an HTML email and unpacks it.

Background: An HTML email keeps its images and style sheets inside the message (referenced by cid:), which a browser cannot open directly. Unpacking writes each part out as a real file and rewrites the references into ordinary paths, so the saved HTML displays correctly — useful for archiving a message as a browsable folder or previewing it outside a mail client. The UnpackUseRelPaths property controls whether the rewritten links use relative or absolute paths; for a single self-contained file, see CreateTempMht, and for web serving see AspUnpack.

Chilkat DataFlex Downloads

Download Chilkat for DataFlex

DataFlex

Use ChilkatAx-win32.pkg

Procedure Test
    Boolean iSuccess
    Handle hoEmail
    String sTemp1

    Move False To iSuccess

    //  Demonstrates the UnpackHtml method, which unpacks an HTML email into an HTML file plus
    //  separate related files (images, style sheets).  Links in the HTML are rewritten to
    //  reference the unpacked files.  Arguments: unpackDir, htmlFilename, partsSubdir.

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

    Get ComLoadEml Of hoEmail "qa_data/eml/html_with_images.eml" To iSuccess
    If (iSuccess = False) Begin
        Get ComLastErrorText Of hoEmail To sTemp1
        Showln sTemp1
        Procedure_Return
    End

    //  Unpack the HTML body and its related files to the filesystem.
    Get ComUnpackHtml Of hoEmail "qa_output/unpacked" "message.html" "parts" To iSuccess
    If (iSuccess = False) Begin
        Get ComLastErrorText Of hoEmail To sTemp1
        Showln sTemp1
        Procedure_Return
    End

    Showln "Unpacked the HTML email to disk."

    //  Note: Paths such as "qa_data/..." and "qa_output/..." are relative local
    //  filesystem paths, relative to the current working directory of the running application.


End_Procedure