ACCESS 2007? Вопросы по GUI

[ezus]

Здравствуйте!
1. Как узнать версию ACCESSа, я только предполагаю, что это 2007?
2. Как вывести полное имя базы на экран?

Простые вопросы, но не смог подобрать адекватные формулировки , для гугла.

Спасибо.

[Aleksandr H.]

Sub Version()
Dim s As String
Select Case CurrentProject.FileFormat
    Case 2: s = "Microsoft Access 2"
    Case 7: s = "Microsoft Access 95"
    Case 8: s = "Microsoft Access 97"
    Case 9: s = "Microsoft Access 2000"
    Case 10: s = "Microsoft Access 2003"
    Case 11: s = "Microsoft Access 2007"
    Case 12: s = "Microsoft Access 2010 - 2013"
End Select
    s = s & Chr(13) & CurrentProject.FullName
    MsgBox s
End Sub

[ezus]

Спасибо за код,
но я имел ввиду получение версии через меню.
Раньше в меню обычно был пункт "About" или тот же подпункт в Help

[Aleksandr H.]

Я таким способ узнаю

[Serge_Bliznykov]

а в 2010 через "Справка" доступна эта информация:
Access_About.jpg

[ezus]

[QUOTE=Aleksandr H.;1596169]Я таким способ узнаю[/QUOTE
Спасибо, попробую узнать у системщиков

[Aleksandr H.]

Зачем системщиков? Разве Вы сами не можете посмотреть?

[ezus]

Все намного проще с версией:
Office Button -> Access options -> Resource -> About ....

А вот по поводу File name(path) пока ничего не нашел.

[Aleksandr H.]

Сообщение от ezus

2. Как вывести полное имя базы на экран?

а)В заголовке окна БД разве нету названия?
б)оффисБаттон-ПараметрыAccess-ТекущаяБазаДанных. Скроллим вниз до раздела "Параметры автофильтра для ХХХХХ (база данных)". ХХХХХ - название базы

[ezus]

В заголовке окна только имя базы, а у меня 2 базы с одним именем из разных папок.
Поэтому мне нужное полное имя - полный путь.