kalender leeren

[Selin]

Hallo,

ein User möchte seinen Notes Kalender leeren.
Er hat auch Wiederholungseinträge drin. Wenn er alle Dokumente auswählt und entfernen drückt kommt die Meldung, dass er einen Wiederholungseintrag auswählen soll.
Wie kann er denn alle Einträge einfach rauslöschen aus dem Kalender?

danke + gruß

[Majonese]

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

[Selin]

danke Dir
Werde ich dann mal testen.

Hab Spaß  

[Moppi2011]

Hallo,

ich hatte auch das Problem, das die Fehlermeldung: sie müssen einen Wiederholungseintrag auswählen kam, wenn ich die Einträge in der Kalenderansicht löschen wollte.

Ich bin dann einfach auf das Lesezeichen Mail und dann in den Ordner Entwürfe gegangen. Hab die Kalendereinträge da markiert und konnte sie da löschen. Waren dann anschließend auch aus dem Kalender entfernt.

MFG

Jule

[pd]

Dankeschön :-)

Patrick