Xojo Plugin

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. Xojo Plugin

Dim success As Boolean
success = False

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

Dim mht As New Chilkat.Mht

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

Dim unpackDir As String
unpackDir = "C:/AAWorkarea/mht_unpack"
Dim htmlFilename As String
htmlFilename = "test.html"
Dim partsSubDir As String
partsSubDir = "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.

success = mht.UnpackMHT(mhtPath,unpackDir,htmlFilename,partsSubDir)
If (success = False) Then
    System.DebugLog(mht.LastErrorText)
    System.DebugLog("Failed.")
Else
    System.DebugLog("Success.")
End If