LOTUSSCRIPT/COM/OLE CLASSES
Examples: SelectionFormula property
1. This view action displays the selection formula for the current view.
Sub Click(Source As Button)
Dim ws As New NotesUIWorkspace
Dim uiview As NotesUIView
Dim view As NotesView
Set uiview = ws.CurrentView
Set view = uiview.View
Messagebox view.SelectionFormula,, "Selection formula"
End Sub
2. This view action sets the selection formula for the current view.
Sub Click(Source As Button)
Dim ws As New NotesUIWorkspace
Dim uiview As NotesUIView
Dim view As NotesView
Dim formula As String
formula = "SELECT (@Modified > [" & (Date - 7) & "])"
Set uiview = ws.CurrentView
Set view = uiview.View
view.SelectionFormula = formula
End Sub
See Also
SelectionFormula property
Glossary
Feedback on
Help
or
Product Usability
?
Help on Help
All Help Contents
Glossary