|
Not directly, since the Lotus Notes workspace icons are not exposed for programmatic access.
You can, however, access all the Lotus Notes databases on your machine.
Dim db as NotesDatabase
Dim dbdir As NotesDbDirectory
Set dbdir =New NotesDbDirectory("")
Set db = dbdir.GetFirstDatabase(DATABASE)
Do while not db is nothing
…
Set db = dbdir.GetNextDatabase
Loop
At CenterPoint, I used this method to build a crawler as part of our corporate application portfolio that collects data on every database on every server.
Or depending on how you manage your Lotus Notes workspace, you might be able to do it in the bookmarks.nsf. If you use the "Welcome page" introduced in Lotus Domino R5, all your bookmarks are stored in bookmarks.nsf, located in your default Notes data directory (normally c:\notes\data or c:\lotus\notes\data). Look at the design and you should have no trouble getting a handle on each database.
Do you have comments on this Ask the Expert Q&A? Let us know.
Related information from SearchDomino.com:
Learning Guide: LotusScript
FAQ: LotusScript
Reference Center: LotusScript tips and resources
|
