VBScript

Convert HTML Text to an MHT Archive

Demonstrates Mht.HtmlToMHT, which creates an MHT web archive from an in-memory HTML string and returns the complete MHT MIME text.

Background. An MHT (MHTML) web archive is a single MIME file that bundles an HTML page together with its referenced resources, such as images and style sheets, so the page can be stored or viewed offline as one file.

Chilkat VBScript Downloads

Download Chilkat for VBScript

VBScript

Dim fso, outFile
Set fso = CreateObject("Scripting.FileSystemObject")
'Create a Unicode (utf-16) output text file.
Set outFile = fso.CreateTextFile("output.txt", True, True)

set mht = CreateObject("Chilkat.Mht")

'  Create an MHT web archive from an in-memory HTML string and return the complete MHT MIME text.
htmlText = "<html><head><title>Example</title></head><body><h1>Hello</h1><p>An example HTML page.</p></body></html>"
mhtText = mht.HtmlToMHT(htmlText)
If (mht.LastMethodSuccess = 0) Then
    outFile.WriteLine(mht.LastErrorText)
    WScript.Quit
End If

outFile.WriteLine(mhtText)

outFile.Close