Examples: GetAllUnreadDocuments method

This agent builds a note collection consisting of documents in the database that the current user has not read, and places them in a folder named "To Be Read".

Sub Initialize
  Dim session As New NotesSession
  Dim db As NotesDatabase
  Dim collectionA As NotesDocumentCollection
  
  Set db = session.CurrentDatabase
  Set collectionA = db.GetAllUnreadDocuments()
  Call collectionA.PutAllInFolder( "To Be Read" )
End Sub