Get DSN Final-Recipients

If an email is a delivery-status-notification (DSN), then the GetDsnFinalRecipients method may be called to fetch the full list of Final-Recipients from the message/delivery-status part of the email.

Download Chilkat Email ActiveX

Download 32-bit Chilkat IMAP ActiveX (.msi)

Download All 32-bit Chilkat ActiveX Components (.zip)

Download All 64-bit Chilkat ActiveX Components (.zip)

Dim fso, outFile
Set fso = CreateObject("Scripting.FileSystemObject")
Set outFile = fso.CreateTextFile("output.txt", True)


set email = CreateObject("Chilkat.Email2")

success = email.LoadEml("dsnSample.eml")
If (success = 0) Then
    MsgBox email.LastErrorText
    WScript.Quit
End If

' sa is a Chilkat.CkStringArray
Set sa = email.GetDsnFinalRecipients()
If (sa Is Nothing ) Then
    MsgBox email.LastErrorText
Else

    n = sa.Count
    For i = 0 To n - 1
        outFile.WriteLine(sa.GetString(i))
    Next

End If

outFile.Close