LOTUSSCRIPT /COM/OLE のクラス
例:ColumnValues プロパティ
1 次のエージェントは、ビューエントリの最初の列の値を表示します。
Sub Initialize
Dim session As New NotesSession
Dim db As New NotesDatabase("","test.nsf")
Dim view As NotesView
Dim entry As NotesViewEntry
Set db = session.CurrentDatabase
Set view = db.GetView("All")
Set entry = view.GetEntryByKey("Sports car", False)
Messagebox entry.ColumnValues(0),, "Column 1"
End Sub
2 次のエージェントは、ビューエントリのすべての列の値を表示します。
Sub Initialize
Dim session As New NotesSession
Dim db As New NotesDatabase("","test.nsf")
Dim view As NotesView
Dim entry As NotesViewEntry
Set db = session.CurrentDatabase
Set view = db.GetView("All")
Set entry = view.GetEntryByKey("Sports car", False)
Forall colval In entry.ColumnValues
col% = col% + 1
Messagebox colval,, "Column " & col%
End Forall
End Sub
関連項目
ColumnValues プロパティ
用語集
ヘルプに対するフィードバック
ヘルプの使い方
ヘルプを開く
用語集
ヘルプに対するフィードバック
ヘルプの使い方
ヘルプを開く