An example of the Summary tab information is shown in the image below.
If you try to loop through the CurrentDb.Properties collection, these particular properties are not present. For this reason, I consider them to be as "extended" database properties. To retrieve these extended properties, we can use a DAO object.
Here's an example code for specifically retrieving the extended properties found in the Summary tab.
Public Function GetSummaryInfo() As String '6/10/2018 'email@example.com Dim db As DAO.Database Dim dbContainer As DAO.Container Dim dbDocument As DAO.Document Dim dbProperty As DAO.Property Set db = CurrentDb() Set dbContainer = db.Containers("Databases") Set dbDocument = dbContainer("SummaryInfo") For Each dbProperty In dbDocument.Properties Debug.Print dbProperty.Name & ": " & dbProperty.Value Next 'cleanup Set dbDocument = Nothing Set dbContainer = Nothing Set db = Nothing End Function
The above technique can also be applied to retrieve some of the extended properties found in the other tabs (like Contents, for example). To see a demo file using this technique to examine the database properties for any Access database file, click the image below.
I hope you find this article useful. Please let me know if you find any bugs in the demo.