Как получить путь к текущей базе
Все очень просо:
Function CM_GetDBPath() As String Dim db As Database With CurrentDb CM_GetDBPath = Left(.Name, Len(.Name) - Len(Dir(.Name))) End With End Function
До встречи!
(с) Скоков Сергей
Подписаться на: RSS или e-mail рассылку или добавить в ЖЖ друзья.