By submitting your personal information, you agree that TechTarget and its partners may contact you regarding relevant content, products and special offers.
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