Displaying Icons based on Content-Class

All Web Store items have content classes that denote their intended purpose. Applications can use this value to determine how to process the data an item contains. Each item's content class is identified in it's DAV:contentclass property.

The following example demonstrates selecting appropriate icons for items in a folder using Microsoft® ActiveX® Data Objects (ADO).

[Visual Basic]

' Assume oRecSub is an ADO Record object of a selected item in a folder;
' Use the content class to select a picture.

Select Case oRecSub.Fields("DAV:contentclass").Value

    'evaluate content-class value
    'and display appropriate icon

    Case "urn:content-classes:message"
        Image1.Picture = LoadPicture("mail01a.ico")
    Case "urn:content-classes:mailfolder"
        Image1.Picture = LoadPicture("mail01a.ico")
    Case "urn:content-classes:appointment "
        Image1.Picture = LoadPicture("clock01.ico")
    Case "urn:content-classes:contact"
        Image1.Picture = LoadPicture("crdfle10.ico")
    Case "urn:content-classes:mailfolder"
        Image1.Picture = LoadPicture("crdfle10.ico")
    Case "urn:content-classes:contactfolder"
        Image1.Picture = LoadPicture("crdfle10.ico")
    Case "urn:content-classes:calendarfolder"
        Image1.Picture = LoadPicture("crdfle10.ico")
    Case Else
        Image1.Picture = LoadPicture("unknown.ico")
End Select