Wer sagt's denn:
Das ist zwar ein Workaround, den ich nicht so toll finde, aber er tut >:D:
Dim db_desktop As NotesDatabase
Dim s As NotesSession
Dim var_views As Variant
Set s = New NotesSession
Set db_desktop = s.GetDatabase("", "desktop6.ndk")
var_views = db_desktop.Views
Forall var_view In var_views
If var_view.Aliases(0) = "MyPrivateView" Then
Set view = var_view
Call RemoveView(view)
Exit Forall
End If
End Forall
Die Funktion RemoveView macht nix weiter als sich das Designdokument der übergebenene View zu holen und dann zu löschen.
Wenn ich die Datenbank im Designer öffne, dann ist die View noch drin, aber im Client nicht mehr.