Examples: PutAllInFolder method

The following example puts all the documents found through the FTSearch method of NotesDatabase into a folder "Spicy" inside another folder "Recipes."

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