LOTUSSCRIPT/COM/OLE CLASSES

Examples: CaretNoteID property
This view action displays the Subject item from the current document in the current view.

Sub Click(Source As Button)
 Dim ws As New NotesUIWorkspace
 Dim uiview As NotesUIView
 Dim s As New NotesSession
 Dim db As NotesDatabase
 Dim doc As NotesDocument
 Set uiview = ws.CurrentView
 Set db = s.CurrentDatabase
 Set doc = db.GetDocumentByID(uiview.CaretNoteID)
 Messagebox doc.GetItemValue("Subject")(0),, _
 "Current document is ..."
End Sub

See also the example for InViewEdit.

See Also