LOTUSSCRIPT/COM/OLE CLASSES

Examples: SetOption method
This agent toggles the value of a database option.

Sub Initialize
 Dim session As New NotesSession
 Dim db As Notesdatabase
 Set db = session.CurrentDatabase
 If db.GetOption(DBOPT_SOFTDELETE) Then
   Call db.SetOption(DBOPT_SOFTDELETE, False)
 Else
   Call db.SetOption(DBOPT_SOFTDELETE, True)
 End If
 Messagebox db.GetOption(DBOPT_SOFTDELETE) ,, "Soft deletions"
End Sub

See Also