Send Bounced Email to Separate Address

Download Chilkat Email ActiveX

This example demonstrates how to create an email such that MDN (message delivery notifications) for bounced email are sent to an email address that is different from the "From" address. This is done by setting the ChilkatEmail2.BounceAddress property.

    ' Create an instance of the mailman for the purpose of unlocking.
    Dim mailman As New ChilkatMailMan2
    mailman.UnlockComponent "Anything for 30-day trial"
    
    ' Create a new email object...
    Dim email As New ChilkatEmail2
    email.Subject = "This is a test"
    email.Body = "This is the mail body"
    email.AddTo "Chilkat Support", "support@chilkatsoft.com"
    ' Email replies will go to sales@chilkatsoft.com
    email.From = "Chilkat Sales <sales@chilkatsoft.com>"
    ' Bounced emails (MDN messages) will get delivered to this email address.
    email.BounceAddress = "admin@chilkatsoft.com"
    
    ' Let's review the MIME...
    MsgBox email.GetMime()
    
    ' We can send the email like this:
    mailman.SmtpHost = "smtp.comcast.net"
    success = mailman.SendEmail(email)
    If (success = 0) Then
        MsgBox mailman.LastErrorText
    Else
        MsgBox "Mail Sent!"
    End If