DataFlex

Count the MIME Parts of a Given Content-Type

Demonstrates the Chilkat Email.GetNumPartsOfType method, which returns the number of non-multipart MIME parts matching a Content-Type pattern. The first argument is the content-type pattern (an exact type or a wildcard), the second is an inlineOnly flag, and the third is an excludeAttachments flag. This example counts the text/* parts.

Background: This is the companion of GetNthTextPartOfType: it tells you how many parts match a pattern so you can loop over them by index. Wildcards like text/* or image/* make it easy to ask questions such as "how many images does this message contain?" while the boolean flags let you include or exclude attachment parts from the count.

Chilkat DataFlex Downloads

Download Chilkat for DataFlex

DataFlex

Use ChilkatAx-win32.pkg

Procedure Test
    Handle hoEmail
    Boolean iSuccess
    Integer n

    //  Demonstrates the GetNumPartsOfType method, which returns the number of non-multipart
    //  MIME parts matching a Content-Type pattern.  The first argument is the Content-Type
    //  pattern (exact or wildcard), the second is inlineOnly, and the third is excludeAttachments.

    Get Create (RefClass(cComChilkatEmail)) To hoEmail
    If (Not(IsComObjectCreated(hoEmail))) Begin
        Send CreateComObject of hoEmail
    End
    Set ComSubject Of hoEmail To "GetNumPartsOfType example"

    Send ComSetTextBody To hoEmail "This is the plain-text version." "text/plain"
    Get ComAddHtmlAlternativeBody Of hoEmail "<html><body>This is the HTML version.</body></html>" To iSuccess

    //  Count the non-multipart parts whose content type matches text/*.
    Get ComGetNumPartsOfType Of hoEmail "text/*" False False To n
    Showln "Number of text/* parts = " n


End_Procedure