B4X

Save Web Page as .mht Web Archive

See more MHT / HTML Email Examples

Downloads a web page into a .mht web archive. B4X

Dim success As Boolean = False

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

Dim mht As ChilkatMht
mht.Initialize("mht")

success = mht.GetAndSaveMHT("http://www.bonairefishing.com/", "bonairefishing.mht")
If success <> True Then
    Log(mht.LastErrorText)
    Return
Else
    Log("MHT Created!")
End If