Lianja

Unpack MHT to Files

See more MHT / HTML Email Examples

Demonstrates how to unpack a .mhtml to files. Unpacks the HTML and to a directory, and image files to a sub-directory located under the directory where the HTML file is unpacked. The image links in the HTML are updated to point to the image files. Lianja

llSuccess = .F.

// This example assumes the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.

loMht = createobject("CkMht")

// This should be an absolute or relative path to the MHT file.
// It is the MHT to be unpacked.
lcMhtPath = "qa_data/mht/test.mht"

lcUnpackDir = "C:/AAWorkarea/mht_unpack"
lcHtmlFilename = "test.html"
lcPartsSubDir = "images"

// Unpacking will create the HTML file C:/AAWorkarea/mht_unpack/test.html
// The image files are unpacked to C:/AAWorkarea/mht_unpack/images
// The unpackDir and partsSubDir are automatically created if needed.

llSuccess = loMht.UnpackMHT(lcMhtPath,lcUnpackDir,lcHtmlFilename,lcPartsSubDir)
if (llSuccess = .F.) then
    ? loMht.LastErrorText
    ? "Failed."
else
    ? "Success."
endif



release loMht