Visual Basic 6.0

Save Web Page as .mht Web Archive

See more MHT / HTML Email Examples

Downloads a web page into a .mht web archive. Visual Basic 6.0

Dim success As Long
success = 0

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

Dim mht As New ChilkatMht

success = mht.GetAndSaveMHT("http://www.bonairefishing.com/","bonairefishing.mht")
If (success <> 1) Then
    Debug.Print mht.LastErrorText
    Exit Sub
Else
    Debug.Print "MHT Created!"
End If