PureBasic

Get the Nth Text Part of a Given Content-Type

Demonstrates the Chilkat Email.GetNthTextPartOfType method, which returns the text content of the Nth non-multipart MIME part matching a Content-Type pattern. The arguments are a zero-based index among the matching parts, the content-type pattern, an inlineOnly flag, and an excludeAttachments flag. This example retrieves the first text/html part.

Background: A MIME message is a tree of parts, and sometimes you want a specific one by its type rather than by walking alternatives or bodies. The content-type pattern can be exact (text/html) or a wildcard (text/*), and the two boolean flags narrow the search — inlineOnly restricts to inline (displayed) parts, and excludeAttachments skips parts marked as attachments — so you can target exactly the text you care about.

Chilkat PureBasic Downloads

Download Chilkat for PureBasic

PureBasic

IncludeFile "CkEmail.pb"

Procedure ChilkatExample()

    ;  Demonstrates the GetNthTextPartOfType method, which returns the text content of the Nth
    ;  non-multipart MIME part matching a Content-Type pattern.  The first argument is the zero-based
    ;  index among matching parts, the second is the Content-Type pattern, the third is inlineOnly, and the fourth is
    ;  excludeAttachments.

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

    CkEmail::setCkSubject(email, "GetNthTextPartOfType example")

    CkEmail::ckSetTextBody(email,"This is the plain-text version.","text/plain")
    CkEmail::ckAddHtmlAlternativeBody(email,"<html><body>This is the HTML version.</body></html>")

    ;  Get the first (index 0) part whose content type matches text/html.
    htmlPart.s = CkEmail::ckGetNthTextPartOfType(email,0,"text/html",0,0)
    Debug "First text/html part:"
    Debug htmlPart


    CkEmail::ckDispose(email)


    ProcedureReturn
EndProcedure