DataFlex

Get a Report Part from a multipart/report Email

Demonstrates the Chilkat Email.GetReport method, which returns the body content of the Nth report within a multipart/report email. The NumReports property gives the count, and indexes are zero-based. This example loads a report email and prints each report part.

Background: A multipart/report message — used for bounces (DSNs) and read receipts (MDNs) — bundles machine-readable report parts alongside the human-readable explanation. GetReport returns the raw content of one such part so a program can parse it, for example to extract the failing recipient and status code from a bounce. Use GetDeliveryStatusInfo for direct field-level access to the delivery-status part.

Chilkat DataFlex Downloads

Download Chilkat for DataFlex

DataFlex

Use ChilkatAx-win32.pkg

Procedure Test
    Boolean iSuccess
    Handle hoEmail
    Integer n
    Integer i
    String sTemp1

    Move False To iSuccess

    //  Demonstrates the GetReport method, which returns the body content of the Nth report
    //  within a multipart/report email.  The NumReports property gives the number of reports;
    //  indexes are zero-based.

    Get Create (RefClass(cComChilkatEmail)) To hoEmail
    If (Not(IsComObjectCreated(hoEmail))) Begin
        Send CreateComObject of hoEmail
    End

    Get ComLoadEml Of hoEmail "qa_data/eml/dsn_bounce.eml" To iSuccess
    If (iSuccess = False) Begin
        Get ComLastErrorText Of hoEmail To sTemp1
        Showln sTemp1
        Procedure_Return
    End

    Get ComNumReports Of hoEmail To n
    Showln "NumReports = " n

    For i From 0 To (n - 1)
        Showln "---- Report " i " ----"
        Get ComGetReport Of hoEmail i To sTemp1
        Showln sTemp1
    Loop

    //  A report returned by GetReport is the body of a report part -- for a bounce (DSN),
    //  that is the machine-readable message/delivery-status part.  It looks similar to:
    //  
    //    Reporting-MTA: dns; mail.example.com
    //    Received-From-MTA: dns; sender.example.com
    //    Arrival-Date: Fri, 10 Jul 2026 20:15:30 +0000
    //  
    //    Final-Recipient: rfc822; nonexistent@example.com
    //    Action: failed
    //    Status: 5.1.1
    //    Diagnostic-Code: smtp; 550 5.1.1 <nonexistent@example.com> User unknown

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


End_Procedure