Database Title

  • Thread starter Thread starter Ig
  • Start date Start date
I

Ig

Hi,
How can I get through VBA "Database Title" on the tab "Summary" of "Database
Properties" screen?
The same question is about "Project Name" on the "General" tab of "Project
Properties" screen.
Thanks
 
I only have Access 97 in front of me at this moment, but this code works
in that version:

Dim dbs As DAO.Database
Dim strTitle As String

Set dbs = CurrentDb()

strTitle = dbs.Containers("Databases").Documents("SummaryInfo").Properties("Title")

' Print Title
Debug.Print strTitle

' Print Project Name
Debug.Print Application.GetOption("Project Name")

Set dbs = Nothing
 
it works on 2002 as well.
Thanks Jeff.

Jeff Conrad said:
I only have Access 97 in front of me at this moment, but this code works
in that version:

Dim dbs As DAO.Database
Dim strTitle As String

Set dbs = CurrentDb()

strTitle =
dbs.Containers("Databases").Documents("SummaryInfo").Properties("Title")

' Print Title
Debug.Print strTitle

' Print Project Name
Debug.Print Application.GetOption("Project Name")

Set dbs = Nothing
Click to expand...
 
Back
Top