(Xojo Plugin) Unpack MHT to Files

See more MHT / HTML Email Examples

Chilkat Xojo Plugin Download Xojo Plugin for Windows, Linux, Mac OS X, and ARM, ARM64

// 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.

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