LOTUSSCRIPT/COM/OLE CLASSES
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.Hue,, _ "Hue RGB value of View A background" End Sub
See Also