Hallihallo!
Ich habe folgendes Script geschrieben, um alle Ansichten einer Datenbank durchzugehen und einen Zähler mitlaufen zu lassen, der die versteckten Ansichten mitzählt.
Dim views As Variant
Dim privCounter, pubCounter As Integer
views = dbCurrent.Views
Forall v In views
If ( v.IsPrivate ) Then
privCounter = privCounter + 1
End If
pubCounter = pubCounter + 1
End Forall
Msgbox pubCounter & " öffentliche Ansichten" & Chr(13) & privCounter & " private Ansichten"
Der Agent läuft lokal und funktioniert. Auf dem Server bekomme ich aber die folgende Fehlermeldung:
Notes error: Index kann nicht auf dem Server erstellt werden. (Name der Ansicht)
Woran liegt das und wie kann ich es beheben? Ich will alle persönlichen Ansichten der Datenbank auf dem Server löschen, damit sie nach einem Gestaltungsupdate auch aktualisiert und neu erstellt werden.
Vielen Dank im Voraus
Jérôme