By submitting your email address, you agree to receive emails regarding relevant topic offers from TechTarget and its partners. You can withdraw your consent at any time. Contact TechTarget at 275 Grove Street, Newton, MA.
event in database script. For example, to prevent documents with Status field
set to Unprocessed to be deleted, following code can handle that
Sub Querydocumentdelete(Source As Notesuidatabase, Continue As Variant)
Dim coll As NotesDocumentCollection
Set coll = Source.Documents
Dim doc As NotesDocument
Set doc = coll.getFirstDocument()
While Not doc Is Nothing
If doc.UnProcessed(0) <> "" Then
Msgbox "You are not allowed to delete Unprocessed documents"
Continue = False
Set doc = coll.getNextDocument(doc)
Continue = True