Beschreibung:

Gibt eine Kategorie zurück. Es muss die Index-Nummer der Kategorie übergeben werden. Der Index geht von 1 bis Count.

Parameter:

Rückgabewert:

Category
NULL (wenn die Kategorie nicht existiert)

Beispiel VBScript:

' Prüft, ob ein bestimmter Termin die Kategorie "Meeting" besitzt

Dim oCategories : Set oCategories = cRM.CurrentProject.timemanager.Appointments.ItemByUniqueID(sUniqueAppointmentID).Categories

Dim oCategory

Dim nCount : nCount = 0

Dim bCategoryMeeting : bCategoryMeeting = False

For nCount = 1 To oCategories.Count

    Set oCategory = oCategories.Item(nCount)

    If (oCategory.Name = "Meeting") Then

        bCategoryMeeting = True

    End If

    Set oCategory = Nothing

Next

Call cRM.DialogMessageBox("Mindestens ein Termin besitzt die Kategorie ""Meeting"" (ID: " & oCategory.ID & ", Symbol: " & oCategory.Symbol & ".", "Categories.Item", vbOkOnly)

Set oCategories = Nothing

Beispiel C#-Script:

// Prüft, ob ein bestimmter Termin die Kategorie "Meeting" besitzt

Categories categories = cRM.CurrentProject.TimeManager.Appointments.ItemByUniqueID(uniqueAppointmentID).Categories;

Category category;

bool isCategoryMeeting = false;

for (int i = 1; i <= categories.Count; i++)

{

    category = categories.Item(i)

    if (category.Name == "Meeting")

    {

        isCategoryMeeting = true;

    }

    category.Dispose();

}

cRM.DialogMessageBox("Mindestens ein Termin besitzt die Kategorie \"Meeting\" (ID: " + category.ID + ", Symbol: " + category.Symbol + ".", "Categories.Item", 0);

categories.Dispose();