LOTUSSCRIPT/COM/OLE CLASSES

Examples: Luminance property
This agent displays the luminance RGB value of the background color of a view.

Sub Initialize
 Dim session As New NotesSession
 Dim db As NotesDatabase
 Dim view As NotesView
 Dim color As NotesColorObject
 Set db = session.CurrentDatabase
 Set view = db.GetView("View A")
 Set color = session.CreateColorObject
 color.NotesColor = view.BackgroundColor
 Messagebox color.Luminance,, _
 "Luminance RGB value of View A background"
End Sub

See Also