Get Email Priority and Return Receipt

Download Chilkat Email ActiveX

Visual Basic example to get an email's priority and return receipt email address.

    ' Create an instance of the mailman for the purpose of unlocking.
    Dim mailman As New ChilkatMailMan2
    mailman.UnlockComponent "Anything for 30-day trial"

    Dim email As New ChilkatEmail2
    email.LoadEml "someEmail.eml"
    
    ' Get the priority:
    Dim priority As String
    priority = email.GetHeaderField("X-Priority")
    
    ' If Len(priority) = 0, then no header field with X-Priority existed.
    ' Otherwise the priority will contain a number 1-5 with 1 being the highest,
    ' 3 is normal, and 5 is lowest.
    
    ' Does the email have a return receipt?
    If (email.ReturnReceipt = 1) Then
        ' Yes...
        ' Now get the return receipt email address:
        emailAddress = email.GetHeaderField("Disposition-Notification-To")
        MsgBox emailAddress
    End If