lfalanga
9/21/2015 - 12:41 PM

Create an empty NotesDocumentCollection

Create an empty NotesDocumentCollection

Dim coll As NotesDocumentCollection
Dim tomorrow As New NotesDateTime("")
tomorrow.SetNow
tomorrow.AdjustDay 1
Set coll = db.Search("@False", tomorrow, 1)
Call coll.AddDocument(document)