Lotus Domino Designer 8 ヘルプ - 例:ビューナビゲータを作成する

LOTUSSCRIPT /COM/OLE のクラス

例:ビューナビゲータを作成する
1 次の例では、ビューナビゲータを作成して MaxLevel プロパティを表示します。

Sub Intialize
Dim session As New NotesSession
Dim db As NotesDatabase
Dim view As NotesView
Dim nav As NotesViewNavigator
Set db = session.CurrentDatabase
Set view = db.GetView("By Category")
Set nav = view.CreateViewNav()
Messagebox nav.MaxLevel
End Sub

2 次の例では、指定のカテゴリに属する全エントリ用にビューナビゲータを作成し、先頭のエントリを取り出します。

3 次の例では、指定のビューエントリに直属の子エントリ用にビューナビゲータを作成します。

Sub Intialize
Dim session As New NotesSession
Dim db As NotesDatabase
Dim view As NotesView
Dim entry As NotesViewEntry
Dim nav As NotesViewNavigator
Dim doc As NotesDocument
Set db = session.CurrentDatabase
Set view = db.GetView("By Category")
Set entry = view.GetEntryByKey("Employees")
Set doc = entry.Document
Set nav = view.CreateViewNavFromChildren(doc)
End Sub

関連項目

ビューナビゲータを作成する

用語集

フィードバック ヘルプ または プロダクトユーザビリティ?

ヘルプの使い方

すべてのヘルプ項目

用語集