LotusScript for Visual Basic Programmers - IBM Redbooks

Accessing the Document Properties
Notes classes provide different NotesDocument properties than provided
by HiTest. Only EncryptOnSend, EncryptionKeys, SaveMessageOnSend,
and SignOnSend are read-write properties. The other properties are
read-only properties.
For more detailed information on NotesDocument, refer to Chapter 3.
Let’s look at an example.
Example
This agent example displays the properties of the first document in the
TEST database.
Dim session As Object
Dim db As Object
Dim dc As Object
Dim doc As Object
Set session = CreateObject ("Notes.NotesSession")
Set db = session.GetDatabase ("","test.nsf")
Set dc = db.AllDocuments
Set doc = dc.GetFirstDocument(1247)
Print ( "Created: " & doc.Created)
Print ( "Last modified: " & doc.LastModified)
Print ("Note ID: " & doc.NoteID)
Following is an explanation of the code.
We declare dc as an object which will reference the document collection in
the database.
Dim dc As Object
We declare doc as an object which will reference the Notes document. It
descends from NotesDocumentCollection.
Dim doc As Object
We get a reference to NotesDocument Collection from the AllDocument
method of NotesDatabase.
Set dc = db.AllDocuments
We get a reference to the first document using the GetFirstDocument
method of the NotesDocument Collection object and store it in doc. 1247
refers to the database type.
152 LotusScript for Visual Basic Programmers