LOTUSSCRIPT/COM/OLE CLASSES
Private Sub URLDatabase_Click() Dim s As New NotesSession Dim db As NotesDatabase s.Initialize Set db = s.URLDatabase MsgBox db.Title, , db.FilePath End Sub
See Also