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();