Unpack HTML Email to Files

Unpacks an HTML email into an HTML file and related files (images and style sheets). The links within the HTML are updated to point to the files unpacked and saved to disk.

Download Chilkat .NET for 2.0 / 3.5 Framework

Download Chilkat .NET for 64-bit 2.0 / 3.5 Framework (x64)

Download Chilkat .NET for 1.0 / 1.1 Framework

Dim email As New Chilkat.Email()

Dim success As Boolean
success = email.LoadEml("bonaire.eml")
If (success <> true) Then
    MsgBox(email.LastErrorText)
    Exit Sub
End If


'  Is this an HTML email?
If (email.HasHtmlBody() = true) Then

    '  Unpack the HTML to files.  The image and css URLs
    '  in the HTML are modified to point to the files extracted to disk.
    Dim unpackDir As String
    unpackDir = "c:/temp"
    Dim partsSubdir As String
    partsSubdir = "images"
    Dim htmlFilename As String
    htmlFilename = "thisEmail.html"
    success = email.UnpackHtml(unpackDir,htmlFilename,partsSubdir)
    If (success <> true) Then
        MsgBox(email.LastErrorText)
    End If

    '  If the UnpackHtml method was successful, the
    '  HTML is written to c:/temp/thisEmail.html and
    '  the image files are located in c:/temp/images

End If