LOTUSSCRIPT/COM/OLE CLASSES
Dim session As New NotesSession Dim db As NotesDatabase Dim outline As NotesOutline Dim oe As NotesOutlineEntry Dim Type As Long Set db = session.CurrentDatabase Set outline = db.GetOutline("products") Set oe = outline.GetFirst() Messagebox "Type: " & oe.Type
See Also