LOTUSSCRIPT/COM/OLE CLASSES
Sub Initialize Dim db As New NotesDatabase( "", "denmark.nsf" ) Dim view As NotesView Dim column As NotesViewColumn Set view = db.GetView( "By Category" ) Set column = view.Columns( 0 ) If column.IsCategory Then Messagebox( "First column is categorized." ) Else Messagebox( "First column isn't categorized." ) End If End Sub
See Also