LOTUSSCRIPT /COM/OLE のクラス

例:Position プロパティ
次のエージェントは、選択されている文書の Body アイテムの内容をストリームに書き込み、読み込みが開始される前にストリームを始点 (0) に配置します。

Sub Initialize
 Dim session As NotesSession
 Dim db As NotesDatabase
 Dim dc As NotesDocumentCollection
 Dim doc As NotesDocument
 Dim stream As NotesStream
 Set session = New NotesSession
 Set db = session.CurrentDatabase
 Set dc = db.UnprocessedDocuments
 Set doc = dc.GetFirstDocument
 REM Create stream
 Set stream = session.CreateStream
 REM Write text of Body item to stream
 Call stream.WriteText(doc.GetItemValue("Body")(0))
 REM Reset position to beginning of stream
 stream.Position = 0
 REM Read text from stream
 Messagebox stream.ReadText(),, "Text read from stream"
End Sub

関連項目