B4X

Create an EML Message from a URL into a ZIP

Demonstrates Mht.GetAndZipEML, which creates an EML MIME message from a live web page and stores it as an entry inside a ZIP archive.

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. The EML output is a MIME email message containing the HTML page and its referenced resources, suitable for sending the page as an HTML email. The ZIP is created if it does not already exist; otherwise the entry is added to it.

Chilkat B4X Downloads

Download Chilkat for B4X

B4X

Dim success As Boolean = False

Dim mht As ChilkatMht
mht.Initialize("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.

'  Create an EML MIME message from a live web page and store it as an entry inside a ZIP archive.  The
'  2nd argument is the entry name within the ZIP; the 3rd is the ZIP file path.
success = mht.GetAndZipEML("https://example-code.com/crumb/email.html", "page.eml", "qa_output/page.zip")
If success = False Then
    Log(mht.LastErrorText)
    Return
End If

Log("EML stored in the ZIP archive.")