LOTUSSCRIPT /COM/OLE のクラス

例:SelectDocument メソッド
次のビューアクションは、コレクションの最初の文書を選択し、ポインタをその文書に移動します。

Sub Click(Source As Button)
 Dim session As New NotesSession
 Dim db As NotesDatabase
 Dim workspace As New NotesUIWorkspace
 Dim collection As NotesDocumentCollection
 Dim doc As NotesDocument
 Dim uiview As NotesUIView
 Set db = session.CurrentDatabase
 Set uiview = workspace.CurrentView
 Set collection = db.AllDocuments
 Set doc = collection.GetFirstDocument
 Call uiview.SelectDocument(doc)
End Sub

関連項目