Lianja

Check if a MIME Part is an Image

Demonstrates the Chilkat Mime.IsImage method, which returns whether the Content-Type begins with image/. It takes no arguments and applies to the current part.

Note: The file path is relative to the application's current working directory. Absolute paths may also be used. Supply the path to your own file.

Background: This locates image parts — inline graphics in a multipart/related message, or image attachments — so your code can preview thumbnails, extract them, or handle them differently from documents. It matches any image/ subtype, including image/svg+xml.

Chilkat Lianja Downloads

Download Chilkat for Lianja

Lianja

llSuccess = .F.

//  Demonstrates the Mime.IsImage method, which returns whether the Content-Type begins with image/.  It takes no arguments and applies to the current
//  part.  This example iterates the parts of a multipart message and reports which ones match.

loMime = createobject("CkMime")
llSuccess = loMime.LoadMimeFile("qa_data/multipart_message.eml")
if (llSuccess = .F.) then
    ? loMime.LastErrorText
    release loMime
    return
endif

n = loMime.NumParts
loPart = createobject("CkMime")

for i = 0 to n - 1
    llSuccess = loMime.PartAt(i,loPart)
    if (llSuccess = .F.) then
        ? loMime.LastErrorText
        release loMime
        release loPart
        return
    endif

    if (loPart.IsImage()) then
        ? "Part " + str(i) + " (" + loPart.ContentType + ") is an image."
    endif

next


release loMime
release loPart