ITrkCriteriaSets.Count (method)

method Count

Syntax:

Long = object.Count ( )

Description:

The Count method will return the number of Criteria Sets defined for the system.

Example:

Dim oTrkItemAgent As Object
Dim oTrkItems As Object

Set oTrkItemAgent =
CreateObject("Tracker.TrkItemAgent")

Set oCritSets =
CreateObject("Tracker.TrkCriteriaSets")

For i = 1 To oCritSets.Count
oTrkItemAgent.CriteriaSet = oCritSets.Item(i)
oTrkItemAgent.Execute oTrkItems
Next i