PureBasic

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 PureBasic Downloads

Download Chilkat for PureBasic

PureBasic

IncludeFile "CkEmail.pb"

Procedure ChilkatExample()

    success.i = 0

    ;  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.

    email.i = CkEmail::ckCreate()
    If email.i = 0
        Debug "Failed to create object."
        ProcedureReturn
    EndIf

    success = CkEmail::ckLoadEml(email,"qa_data/eml/dsn_bounce.eml")
    If success = 0
        Debug CkEmail::ckLastErrorText(email)
        CkEmail::ckDispose(email)
        ProcedureReturn
    EndIf

    n.i = CkEmail::ckNumReports(email)
    Debug "NumReports = " + Str(n)

    i.i
    For i = 0 To n - 1
        Debug "---- Report " + Str(i) + " ----"
        Debug CkEmail::ckGetReport(email,i)
    Next

    ;  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.


    CkEmail::ckDispose(email)


    ProcedureReturn
EndProcedure