Xojo Plugin

Unpack MHT MIME Text into Files

Demonstrates Mht.UnpackMHTString, which extracts MHT data into its constituent parts: the HTML document and its referenced resources. The source is MHT MIME text supplied as a string.

The file paths are relative to the application's current working directory. Absolute paths may also be used. Supply the paths appropriate to your own environment.

Background. Despite the method name, the source may be either literal MHT MIME text or a local MHT file path; Chilkat distinguishes the two by detecting MIME headers. The HTML is written under the chosen filename, and referenced parts are written into a sub-directory.

Chilkat Xojo Plugin Downloads

Download Chilkat for Xojo Plugin

Xojo Plugin

Dim success As Boolean
success = False

Dim mht As New Chilkat.Mht

//  The file paths are relative to the application's current working directory.  Absolute paths may
//  also be used.  Supply the paths appropriate to your own environment.

//  Load the MHT MIME text into a string.
Dim sbMht As New Chilkat.StringBuilder
Dim bLoaded As Boolean
bLoaded = sbMht.LoadFile("qa_data/page.mht","utf-8")
If (bLoaded <> True) Then
    System.DebugLog("Failed to load the MHT file.")
    Return
End If

//  Unpack the MHT MIME text into its constituent parts.  The 1st argument may be MHT MIME text or a
//  file path; the 2nd is the unpack directory, the 3rd is the main HTML filename, and the 4th is the
//  sub-directory (relative to the unpack directory) for the referenced parts such as images and style
//  sheets.
success = mht.UnpackMHTString(sbMht.GetAsString(),"qa_output/unpacked","index.html","parts")
If (success = False) Then
    System.DebugLog(mht.LastErrorText)
    Return
End If

System.DebugLog("MHT unpacked.")