Hallo Selin,
also ich denke da hilft nur ein Skript mit dem Du dir die Ansicht Calendar aufrufst und den Inhalt entfernst. Leider bin ich nicht gerade der Programmiergott. Allerdings habe ich hier ein Skript gefunden, welches Du z.B. in einen Button bauen könntest. Ich würde aber noch dringend einen Test empfehlen, bevor Du Ihn an einen User sendest.
Sub Click(Source As Button)
Dim session As notessession
Dim uiws As notesuiworkspace
Dim db As notesdatabase
Dim doc As notesdocument
Dim view As NotesView
Dim item As NotesItem
Set session = New notessession
Set uiws = New notesuiworkspace
Set db = session.currentdatabase
Set view = db.GetView( "Calendar" )
Set doc = view.GetFirstDocument
While Not(doc Is Nothing)
Call doc.Remove( True )
Set doc = view.GetFirstDocument
Wend
End Sub
Viel Spaß beim testen und viele Grüße
Majonese
