(495) 925-0049, ITShop интернет-магазин 229-0436, Учебный Центр 925-0049
  Главная страница Карта сайта Контакты
Поиск
Вход
Регистрация
Рассылки сайта
 
 
 
 
 

Путь и имя базы данных

Terry Kreft & Ken Getz

Эту информацию содержит свойство .Name объекта базы.

Например, напечатайте ? CurrentDB.Name в окне Debug. Будет возвращен полный путь к базе данных, включая и имя файла текущей базы данных.

А чтобы получить только папку расположения базы, используйте эту функцию:

'******************** Code Begin ****************

'Code courtesy of

'Terry Kreft & Ken Getz

Function CurrentDBDir() As String

Dim strDBPath As String

Dim strDBFile As String

strDBPath = CurrentDb.Name

strDBFile = Dir(strDBPath)

CurrentDBDir = Left$(strDBPath, Len(strDBPath) - Len(strDBFile))

End Function

'******************** Code End ****************

Чтобы получить только имя текущей базы, используйте Dir$

? Dir$( CurrentDB.Name ) в окне отладки

или Dir$( strFilePath ) в коде функции выше

Ссылки по теме


 Распечатать »
 Правила публикации »
  Написать редактору 
 Рекомендовать » Дата публикации: 18.10.2007 
 

Магазин программного обеспечения   WWW.ITSHOP.RU
Microsoft 365 Business Basic (corporate)
Microsoft 365 Apps for business (corporate)
Microsoft Office для дома и учебы 2019 (лицензия ESD)
Microsoft Office 365 Профессиональный Плюс. Подписка на 1 рабочее место на 1 год
Microsoft Office 365 Персональный 32-bit/x64. 1 ПК/MAC + 1 Планшет + 1 Телефон. Все языки. Подписка на 1 год.
 
Другие предложения...
 
Курсы обучения   WWW.ITSHOP.RU
 
Другие предложения...
 
Магазин сертификационных экзаменов   WWW.ITSHOP.RU
 
Другие предложения...
 
3D Принтеры | 3D Печать   WWW.ITSHOP.RU
 
Другие предложения...
 
Новости по теме
 
Рассылки Subscribe.ru
Информационные технологии: CASE, RAD, ERP, OLAP
Безопасность компьютерных сетей и защита информации
Новости ITShop.ru - ПО, книги, документация, курсы обучения
Программирование на Microsoft Access
CASE-технологии
Компьютерные книги. Рецензии и отзывы
Все о PHP и даже больше
 
Статьи по теме
 
Новинки каталога Download
 
Исходники
 
Документация
 
 



    
rambler's top100 Rambler's Top100