LOTUSSCRIPT/COM/OLE CLASSES

Examples: KeepSelectionFocus property
This script indicates whether an outline entry keeps selection focus.

Dim s As New NotesSession
Dim db As NotesDatabase
Dim outline As NotesOutline
Dim entry As NotesOutlineEntry
Set db = s.CurrentDatabase
Set outline = db.getOutline("DiscOutline")
Set entry = outline.GetFirst
If (entry.KeepSelectionFocus) Then
 Messagebox "Keeps selection focus",, entry.Alias
Else
 Messagebox "Does not keep selection focus",, entry.Alias
End If

See Also