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
Véase también
SelectionFormula property
Glosario
¿Desea opinar sobre la
Ayuda
o sobre la
utilidad del producto
?
Ayuda sobre la Ayuda
Todo el contenido de la Ayuda
Glosario