LotusScript for Visual Basic Programmers - IBM Redbooks

Dim doc As Object
We create a reference to the Notes object that is created externally.
Set session = CreateObject("Notes.NotesSession")
We use the Notes object hierarchy to create the object db to access the
Notes database TEST on the local server. For the GetDatabase method,
the first parameter is the server name, the second parameter is the
database file name. If the server is a local server, specify an empty
string, as in our example.
Set db = session.GetDatabase("", "test.nsf")
We use the Notes hierarchy to create the doc object to access a Notes
document.
Set doc = db.CreateDocument()
We use the Main Topic form to create the document.
doc.Form = "Main Topic"
Fill the Subject and Body text fields with the contents of the text boxes
in the Visual Basic application.
doc.Subject = Form1.Text3.Text
doc.Body = Form1.Text2.Text
We use the Save method to save the document. We want the document
to be saved even if someone else edits and saves the document while
the application is running. So we set True in the first argument.
Otherwise when someone else edits the document while the application
is running, the second argument determines what happens.
Call doc.Save(True, False)
3. Put the following code on the Exit command button:
Private Sub Command2_Click()
Set db = Nothing
Set session = Nothing
Unload Form1
End Sub
Following is an explanation of the code.
We release object db and object session before we exit the application.
Set db = Nothing
Set session = Nothing
88 LotusScript for Visual Basic Programmers