VBScript

Check Whether an Email Is a multipart/report

Demonstrates the Chilkat Email.IsMultipartReport method, which returns true when the top-level message structure is a multipart/report (such as a bounce/DSN or a read receipt/MDN). This example loads an email and reports whether it is a multipart/report.

Background: Automated mail — delivery failures and read receipts — arrives wrapped in the multipart/report structure, which carries machine-readable report parts. Detecting it with IsMultipartReport is the first step in a bounce-handling pipeline: once you know a message is a report, you can pull its parts with GetReport or read delivery fields with GetDeliveryStatusInfo to act on failures automatically.

Chilkat VBScript Downloads

Download Chilkat for VBScript

VBScript

Dim fso, outFile
Set fso = CreateObject("Scripting.FileSystemObject")
'Create a Unicode (utf-16) output text file.
Set outFile = fso.CreateTextFile("output.txt", True, True)

success = 0

'  Demonstrates the IsMultipartReport method, which returns true if the top-level message
'  structure is a multipart/report (such as a bounce / DSN or a read receipt / MDN).

set email = CreateObject("Chilkat.Email")

success = email.LoadEml("qa_data/eml/dsn_bounce.eml")
If (success = 0) Then
    outFile.WriteLine(email.LastErrorText)
    WScript.Quit
End If

If (email.IsMultipartReport() = 1) Then
    outFile.WriteLine("This email is a multipart/report (e.g. a bounce or read receipt).")
Else
    outFile.WriteLine("This email is not a multipart/report.")
End If

'  Note: The path "qa_data/..." is a relative local filesystem path,
'  relative to the current working directory of the running application.

outFile.Close