Database Properties 1

[rgbanse]

One of the properties for each database is "Manager"
File/Database Properties - Summary Tab
Is there some VBA code to extract this info - similar to Msgbox CurrentDb.Name
thx
RGB

 

[FancyPrairie]

The following code should do it for you.

Dim dbs As DAO.Database

Dim ctrDatabases As DAO.Container
Dim docSummaryInfo As DAO.Document
Set dbs = CurrentDb

Set ctrDatabases = dbs.Containers!Databases
Set docSummaryInfo = ctrDatabases.Documents!SummaryInfo
MsgBox docSummaryInfo.Properties("Manager&quot

 

[rgbanse]

Thats the ticket works great
thx
RGB