DataFlex

Add Header Field to MIME Sub-Header in Email

See more Email Object Examples

Demonstrates how to add a header field to one of the attachment sub-headers in an email. DataFlex

Use ChilkatAx-win32.pkg

Procedure Test
    Boolean iSuccess
    Handle hoEmail
    String sTemp1

    Move False To iSuccess

    // This example requires the Chilkat API to have been previously unlocked.
    // See Global Unlock Sample for sample code.

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

    Set ComSubject Of hoEmail To "test"
    Get ComAddTo Of hoEmail "Chilkat" "support@chilkatsoft.com" To iSuccess
    Set ComFrom Of hoEmail To "Matt <matt@example.com>"
    Set ComBody Of hoEmail To "This is a simple plain-text body."

    Get ComAddFileAttachment2 Of hoEmail "qa_data/1.HPM" "application/x-hprimnet" To iSuccess
    If (iSuccess = False) Begin
        Get ComLastErrorText Of hoEmail To sTemp1
        Showln sTemp1
        Procedure_Return
    End

    // Add a "ContentDescription: HPM/3.0" in the attachment's sub-header.
    // The 1st attachment is at index 0.
    Send ComAddAttachmentHeader To hoEmail 0 "Content-Description" "HPM/3.0"

    // Show the email MIME:
    Get ComGetMime Of hoEmail To sTemp1
    Showln sTemp1

    // This is the output:

    // MIME-Version: 1.0
    // Date: Wed, 16 Jan 2019 10:05:18 -0600
    // Message-ID: <93B88835586270B7BE5202F84E171F29C10BA935@CHILKATSLICE>
    // Content-Type: multipart/mixed; boundary="------------000502000000020502010608"
    // X-Priority: 3 (Normal)
    // Subject: test
    // To: Chilkat <support@chilkatsoft.com>
    // From: Matt <matt@example.com>
    // 
    // --------------000502000000020502010608
    // Content-Type: text/plain; charset=us-ascii; format=flowed
    // Content-Transfer-Encoding: 7bit
    // 
    // This is a simple plain-text body.
    // --------------000502000000020502010608
    // Content-Type: application/x-hprimnet; name="1.HPM"
    // Content-Transfer-Encoding: base64
    // Content-Disposition: attachment; filename="1.HPM"
    // Content-Description: HPM/3.0
    // 
    // FILE_DATA_IS_HERE...
    // 
    // --------------000502000000020502010608--


End_Procedure