LOTUSSCRIPT /COM/OLE のクラス

例:PutAllInFolder メソッド
次の例は、NotesDatabase の FTSearch メソッドで検索されたすべての文書を、「Recipes」フォルダの中にある「Spicy」サブフォルダに入れます。

Sub Click(Source As Button)
 Dim session As New NotesSession
 Dim db As NotesDatabase
 Dim collection As NotesDocumentCollection
 Set db = session.CurrentDatabase
 Set collection = db.FTSearch( "cayenne", 20 )
 Call collection.PutAllInFolder( "Recipes\Spicy" )
End Sub

関連項目