LOTUSSCRIPT/COM/OLE CLASSES
Dim session As New NotesSession Dim db As NotesDatabase Dim db2 As New NotesDatabase("","Test.nsf") Dim outline As NotesOutline Dim entry As NotesOutlineEntry Set db = session.CurrentDatabase Set outline = db.CreateOutline("Products") Call outline.createEntry("First Entry") Set entryA = outline.getFirst() Call entryA.SetNoteLink(db2) Call outline.save()
See Also