LOTUSSCRIPT/COM/OLE CLASSES
On Error Goto errorHandler Dim workspace As New NotesUIWorkspace Call workspace.AddDatabase( _ Inputbox("Name of server?", "Server"), _ Inputbox("Filename of database?", "Database")) errorHandler: Exit Sub
See Also