Examples: Name property (NotesDbDirectory - LotusScript®)
- This LotusScript® agent
gets the name of a database directory.
Sub Initialize
Dim dbdir As New NotesDbDirectory _
(Inputbox("Enter name", "Directory name"))
If dbdir.Name = "" Then
Messagebox "Local",, "Database directory"
Else
Messagebox dbdir.Name,, "Database directory"
End If
End Sub
- This Visual Basic code gets the name of a database directory.
Private Sub DbName_Click()
Dim s As New NotesSession
s.Initialize
Dim dir As NotesDbDirectory
Set dir = s.GetDbDirectory(Text1)
If dir.name = "" Then
MsgBox "Local", , "Directory name"
Else
MsgBox dir.name, , "Directory name"
End If
End Sub
Have feedback?
Google Analytics is used to store comments and ratings. To provide a comment or rating for a topic, click Accept All Cookies or Allow All in Cookie Preferences in the footer of this page.