VB.NET
VB.NET
Unzip an Email's Zip Attachments
See more Email Object Examples
Demonstrates the Chilkat Email.UnzipAttachments method, which unzips and replaces any Zip file attachments with their expanded contents. For example, if an email contains a single Zip holding three files, that Zip attachment is replaced by the three files as individual attachments. This example loads an email and expands its Zip attachments.
Background: Senders often bundle several files into one
.zip to keep a message tidy or to compress large content. UnzipAttachments reverses that automatically, so downstream processing can work with the individual files directly rather than having to detect, extract, and re-inject archive contents. It is the inverse of ZipAttachments.Chilkat VB.NET Downloads
Dim success As Boolean = False
' Demonstrates the UnzipAttachments method, which unzips and replaces any Zip file
' attachments with their expanded contents. For example, a single Zip containing 3 files
' is replaced by those 3 files as individual attachments.
Dim email As New Chilkat.Email
success = email.LoadEml("qa_data/eml/with_zip_attachment.eml")
If (success = False) Then
Debug.WriteLine(email.LastErrorText)
Exit Sub
End If
Debug.WriteLine("NumAttachments before = " & email.NumAttachments)
' Expand any Zip attachments in place.
success = email.UnzipAttachments()
If (success = False) Then
Debug.WriteLine(email.LastErrorText)
Exit Sub
End If
Debug.WriteLine("NumAttachments after = " & email.NumAttachments)
' Note: The path "qa_data/..." is a relative local filesystem path,
' relative to the current working directory of the running application.