Xbase++

Get the Content-Type of a Related Item

Demonstrates the Chilkat Email.GetRelatedContentType method, which returns the Content-Type of the Nth related content item in an email. The index is zero-based. This example adds a related style sheet and reads its content type.

Background: Each related item declares a Content-Type — image/png for an inline image, text/css for a style sheet, and so on — that tells the rendering client how to use it. Reading the content type lets a program enumerate a message's embedded resources and act on them by kind, for example collecting every inline image while ignoring the style sheets.

Chilkat Xbase++ Downloads

Download Chilkat for Xbase++

Xbase++

LOCAL oEmail
LOCAL cCt

//  Demonstrates the GetRelatedContentType method, which returns the Content-Type of the Nth
//  related content item in an email.  The index is zero-based.

oEmail := CreateObject("Chilkat.Email")
oEmail:Subject := "GetRelatedContentType example"

//  The HTML references the style sheet by name (Content-Location).
oEmail:SetHtmlBody('<html><head><link rel="stylesheet" href="styles.css"/></head><body>Styled.</body></html>')

//  Add the related style sheet (index 0).
oEmail:AddRelatedString2("styles.css", "body { color: navy; }", "utf-8")

//  Read the Content-Type of the first related item (index 0).
cCt := oEmail:GetRelatedContentType(0)
? "Related item 0 Content-Type: " + cCt

oEmail:destroy()