HCL Domino - Examples: NotesView class - Need a Domino Consultant? Call NotesMail +1 212-599-2048

HCLSoftware Business Partner Domino Consulting Services CRUCIAL Notes Tools +1 212-599-2048	Domino Consulting Services CRUCIAL Notes Tools Domino administration Notes development	Chat now
.

Need a Domino Consultant? Call NotesMail +1 212-599-2048 - HCLSoftware Business Partner

LOTUSSCRIPT/COM/OLE CLASSES

Examples: NotesView class
1. This script finds the By Category view in a mail database and then gets the first document in the view.

Dim db As New NotesDatabase( "Havana","mail\cbanner.nsf" ) Dim view As NotesView Dim doc As NotesDocument Set view = db.GetView( "By Category" ) view.AutoUpdate = False Set doc = view.GetFirstDocument

2. This script calls GetView using a view's alias instead of its full name.

Dim db As New NotesDatabase( "Havana", "calendar.nsf" ) Dim view As NotesView Set view = db.GetView( "CategoryView" )

3. You can access hidden views the same way as any other view; include the parentheses in the view name. This script gets a hidden view in a calendar database.

Dim db As New NotesDatabase( "Havana", "calendar.nsf" ) Dim view As NotesView Set view = db.GetView( "(Days by Key)" )

4. This agent finds the default view of a database. It uses the Views property from the NotesDatabase class and the IsDefault property from the NotesView class.

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

NotesView class

Feedback on Help or Product Usability?

Help on Help

All Help Contents

Feedback on Help or Usability?

Help on Help

All Help Contents