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")
view.AutoUpdate = False
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")
view.AutoUpdate = False
Set entry = view.GetEntryByKey("Sports car", False)
Forall colval In entry.ColumnValues
col% = col% + 1
Messagebox colval,, "Column " & col%
End Forall
End Sub
関連項目
ColumnValues プロパティ
用語集
フィードバック
ヘルプ
または
プロダクトユーザビリティ
ヘルプの使い方
すべてのヘルプ項目
用語集