PowerBuilder

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

integer li_rc
long li_Success
oleobject loo_Email

li_Success = 0

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

loo_Email = create oleobject
li_rc = loo_Email.ConnectToNewObject("Chilkat.Email")
if li_rc < 0 then
    destroy loo_Email
    MessageBox("Error","Connecting to COM object failed")
    return
end if

loo_Email.Subject = "test"
loo_Email.AddTo("Chilkat","support@chilkatsoft.com")
loo_Email.From = "Matt <matt@example.com>"
loo_Email.Body = "This is a simple plain-text body."

li_Success = loo_Email.AddFileAttachment2("qa_data/1.HPM","application/x-hprimnet")
if li_Success = 0 then
    Write-Debug loo_Email.LastErrorText
    destroy loo_Email
    return
end if

//  Add a "ContentDescription: HPM/3.0" in the attachment's sub-header.
//  The 1st attachment is at index 0.
loo_Email.AddAttachmentHeader(0,"Content-Description","HPM/3.0")

//  Show the email MIME:
Write-Debug loo_Email.GetMime()

//  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--


destroy loo_Email