LOTUSSCRIPT/COM/OLE CLASSES
Examples: Name property
1. 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
2. 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
Véase también
Name property
Glosario
¿Desea opinar sobre la Ayuda?
Ayuda sobre la Ayuda
Abrir la Ayuda en pantalla completa
Glosario
¿Desea opinar sobre la Ayuda?
Ayuda sobre la Ayuda
Abrir la Ayuda en pantalla completa