Xbase++

Get a Header Attribute of an Attached Message

Demonstrates the Chilkat Email.GetAttachedMessageAttr method, which returns a header-field attribute value for the Nth attached (embedded) email. The first argument is the zero-based attached-message index, the second is the header field name, and the third is the attribute name. This example attaches an email and reads the filename attribute of its Content-Disposition header.

Background: MIME header fields can carry named attributes (parameters) after the main value — for example Content-Disposition: attachment; filename="report.eml", where filename is an attribute. Rather than parsing the raw header yourself, this method extracts a single named attribute from a chosen header of a specific embedded message, which is convenient when a message forwards other emails as nested message/rfc822 parts.

Chilkat Xbase++ Downloads

Download Chilkat for Xbase++

Xbase++

LOCAL nSuccess
LOCAL oInnerEmail
LOCAL oEmail
LOCAL cFname

nSuccess := 0

//  Demonstrates the GetAttachedMessageAttr method, which returns a header-field attribute
//  value for the Nth attached (embedded) email.  The first argument is the zero-based
//  attached-message index, the second is the header field name, and the third is the attribute name.

//  Build an inner email to attach.
oInnerEmail := CreateObject("Chilkat.Email")
oInnerEmail:Subject := "Embedded message"
oInnerEmail:From := "alice@example.com"
oInnerEmail:AddTo("Bob", "bob@example.com")

//  Attach it to an outer email as a message/rfc822 part.
oEmail := CreateObject("Chilkat.Email")
oEmail:Subject := "Has an attached message"
nSuccess := oEmail:AttachEmail(oInnerEmail)
IF (nSuccess == 0)
    ? oEmail:LastErrorText
    oInnerEmail:destroy()
    oEmail:destroy()
    RETURN
ENDIF

//  Get the "filename" attribute of the "Content-Disposition" header of the first
//  attached message (index 0).
cFname := oEmail:GetAttachedMessageAttr(0, "Content-Disposition", "filename")
? "Attached message filename attribute: " + cFname

oInnerEmail:destroy()
oEmail:destroy()