.

HCLSoftware Business Partner
Domino Consulting Services
CRUCIAL Notes Tools
+1 212-599-2048

Domino Consulting Services
CRUCIAL Notes Tools
Domino administration
Notes development

Facebook Twitter YouTube
Chat now       
.
ProductsDownloadsNewsAbout usContact


Need a Domino Consultant? Call NotesMail +1 212-599-2048 - HCLSoftware Business Partner

LOTUSSCRIPT/COM/OLE CLASSES


Examples: ViewInheritedName
This agent displays the inherited name for the current view.

Sub Initialize
 Dim ws As New NotesUIWorkspace
 Dim uiview As NotesUIView
 Dim view As NotesView
 Set uiview = ws.CurrentView
 Set view = uiview.View
 vin$ = view.ViewInheritedName
 If vin$ = "" Then vin$ = "None"
 Messagebox "Inherited name = " & vin$,, view.Name
End Sub

See Also