ITrkItemType.TypeCode (read-only property)

property TypeCode
Syntax: Short = object.TypeCode
Description:

Example:
Dim oTrkItemType As Object
Dim oTrkItemTypes As Object
Set oTrkItemTypes = CreateObject("Tracker.TrkItemTypes")

For i = 1 To oTrkItemTypes.count
Set oTrkItemType = oTrkItemTypes.item(i)
trace "Type Code " & oTrkItemType.TypeCode
Next i
...