LOTUSSCRIPT/COM/OLE CLASSES
Examples: Views property
1. This script displays the names of all the views and folders in the current database.
Sub Initialize
Dim session As New NotesSession
Dim db As NotesDatabase
Dim views As Variant
Set db = session.CurrentDatabase
views = db.Views
Forall v In views
Messagebox( v.Name )
End Forall
End Sub
2. This script uses the Views property to find the default view of the current database and assign it to the view object.
Sub Initialize
Dim session As New NotesSession
Dim db As NotesDatabase
Dim view As NotesView
Dim views As Variant
Set db = session.CurrentDatabase
views = db.Views
Forall v In views
If v.IsDefaultView Then
Set view = v
Exit Forall
End If
End Forall
If view Is Nothing Then
Messagebox "",, "No default view"
Else
Messagebox view.Name,, "Default view"
End If
End Sub
See Also
Views property
Glossary
Feedback on
Help
or
Product Usability
?
Help on Help
All Help Contents
Glossary