Item

Beschreibung:

Liefert eine aktive Ansicht als Objekt zurück. Es muss die Index-Nummer der Ansicht übergeben werden. Der Index geht von 1 bis Count.

Parameter:

Parametername

Typ

Beschreibung

Index

Long

Index-Nummer.

 

Rückgabewert:

View

Beispiel VBScript:

' Schließt alle Ansichten außer der derzeit geöffneten Ansicht

 

Dim oActiveViews : Set oActiveViews = cRM.CurrentProject.ActiveViews

Dim sCurrentActiveViewName : sCurrentActiveViewName = oActiveViews.ActiveView.Name

Dim nCounter : nCounter = 0

Dim oView

 

For nCounter = 1 To oActiveViews.Count

 

    Set oView = oActiveViews.Item(nCounter)

   

    If (oView.Name <> sCurrentActiveViewName) Then

   

        Call oActiveViews.CloseView(nCounter)

   

    End If

   

    Set oView = Nothing

 

Next

 

Set oActiveViews = Nothing

Beispiel C#-Script:

// Schließt alle Ansichten außer der derzeit geöffneten Ansicht

 

ListViews activeViews = cRM.CurrentProject.ActiveViews;

string currentViewName = activeViews.ActiveView.Name;

View view;

 

for (long counter = 0; counter < activeViews.Count; counter++)

{

    view = activeViews.Item(counter);

 

    if (view.Name != currentViewName)

    {

        activeViews.CloseView(counter);

    }

}

 

view.Dispose();

activeViews.Dispose();