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
Help on Help
Open Full Help Window
Glossary
Help on Help
Open Full Help Window