[AP] 限制刪除權限

在Other>Database Resources裡設計，可限制刪除權限

Sub Queryclose(Source As Notesuidatabase, Continue As Variant)
Dim session As New NotesSession 
Call session.SetEnvironmentVar ("wk_ap068","")
End Sub

Sub Querydocumentdelete(Source As Notesuidatabase, Continue As Variant)
continue = False

End Sub