Domino 9 und frühere Versionen > ND6: Entwicklung

Mails in den Papierkorb verschieben

<< < (2/2)

oson00:
So ich habe es nun probiert und es klappt tatsächlich einfach per Script und der Methode .remove

Ich habe folgendes Script laufen lassen und alle meine Dokumente sind in den Papierkorb gewandert.


--- Code: --- Dim s As New NotesSession
Dim docCol As NotesDocumentCollection

Set docCol = s.CurrentDatabase.AllDocuments

Dim doc, delDoc As NotesDocument
Set doc = docCol.GetFirstDocument

Do Until doc Is Nothing
Set delDoc = doc

Set doc = docCol.GetNextDocument(doc)

Call delDoc.Remove(True)
Loop

--- Ende Code ---



Manchmal ist es doch einfacher als man vermutet. Danke für die Hilfe.

Tode:
ACHTUNG: Diese Methode funktioniert nur in Datenbanken mit aktivierten Soft- Deletions !!!
Sind die Soft- Deletions in den Datenbankeigenschaften nicht aktiviert, dann führt ein doc.Remove unweigerlich zu einem unwiederbringlich gelöschten Dokument.

Das ist jetzt weniger für Dich @oson, sondern eher für jemanden, der das ganze später mal liest.

Die Soft- Deletions der Mail- Datenbanken sind nämlich erst seit R6 standardmässig aktiviert, und in selbst entwickelten Datenbanken sind sie meist deaktiviert.

Gruß
Tode

iukhdh:
Na dann ergänze ich auch noch  :)

Bei meiner Anmerkung oben gilt das gleiche. Wenn Soft-Delitions nicht gesetzt ist, dann verschwindet die Mail mit @command([MoveToTrash]) auch nicht im Papierkorb, sondern wird nur zum löschen markiert.

Thomas

Navigation

[0] Themen-Index

[*] Vorherige Sete