現在開いているデータベースを表す NotesUIDatabase オブジェクトを返します。
NotesUIWorkspace
NotesUIDatabase
Set notesUIDatabase = notesUIWorkspace.CurrentDatabase
このプロパティは、[表示] - [移動] (データベースを選択してからワークスペースメニューで使用できる) を選択すると現在のデータベースのアクセスに失敗するため、GetCurrentDatabase メソッドに代わりました。
例