Что выбрать: CurrentDb или DBEngine(0)(0)?
Для получения ссылки на текущую базу данных необходимо использовать объект DBEngine, а также коллекции Workspaces (член этой коллекции Workspaces(0) создается автоматически во время вашей регистрации в Access) и Databases (Access открывает базу данных пользователя как Databases(0)). Все это можно сделать посредством оператора DBEngine.Workspaces(0).Databases(0) который можно сократить до
DBEngine(0)(0) если вас устраивают коллекции, используемые по умолчанию (см. далее раздел «Коллекции, используемые по умолчанию»).
Если с помощью этих операторов можно получить ссылку на базу данных пользователя, то зачем же тогда нужна функция CurrentDb, делающая то же самое? И почему компания Microsoft раньше утверждала, что эта функция устарела и вместо нее лучше использовать вышеприведенные операторы, а теперь она опять говорит о том, что использование функции CurrentDb более предпочтительно? Все это сводится к одному: ядро базы данных (Jet) и Access — это два отдель-ных продукта. Хотя Jet и обеспечивает необходимую функциональность, кото-рая требуется Access при работе с базами данных, однако Access предоставляет пользователю свой уровень сервиса, используемый разработчиками при написа-нии приложений в Access. Таким образом, Jet позволяет получить ссылку на базу данных пользователя посредством оператора DBEngine(0)(0), тогда как Access — посредством функции CurrentDb.
Разумеется, использование оператора DBEngine(0)(0) обязательно, когда вы ра-ботаете вне Access. Иначе говоря, если для управления объектами доступа к дан-ным (DAO) используются средства OLE-автоматизации, это единственный путь для получения ссылки на базу данных Access. С другой стороны, Access предос-тавляет функцию CurrentDb, позволяющую сделать то же самое внутри Access. Существуют некоторые тонкости при получении ссылки на базу данных пользователя внутри Access. Объекты CurrentDb и DBEngine(0)(0) не являются од-ним и тем же объектом, хотя они и ссылаются на одну и ту же базу данных. Каж-дый раз, когда вы получаете эту ссылку посредством функции CurrentDb, Access создает новый внутренний объект, ссылающийся на текущую базу данных. Ядро базы данных (Jet) при выполнении оператора DBEngine(0)(0) таких объектов не создает и возвращает только ссылку на эту базу. Это объясняет, почему нельзя создать ссылки, используя функцию CurrentDb в операторе, включающем в себя несколько других ссылок. Когда VBA во время исполнения такого оператора встретит эту функцию, Access создаст свою внутреннюю ссылку и предоставит ее вам как ссылку на текущую базу данных (такие же действия Access выполняет при открытии базы данных посредством функции OpenDatabase). После выполне-ния оператора Access закрывает внутреннюю ссылку на текущую базу данных. Для некоторых типов объектов, например для наборов записей, Access пытается сохранить эту ссылку. Для других же типов объектов эта ссылка не сохраняется и дальнейшие попытки ее использования заканчиваются неудачно.
Например, попытка выполнения процедуры
Sub ThisDoesntWork()
Dim doc As Document
Set doc CurrentDb.Containers!Tables.Documents(0)
Debug.Print doc.Name
End Sub
приведет к ошибке при выполнении оператора вывода значения свойства
doc.Name в окне отладки. Объект базы данных, использовавшийся для получения ссылки на конкретный документ, был уничтожен, поэтому ссылка на doc стала некорректной. Заметим, что если бы вы заменили в данном программном коде CurrentDb на DBEngine(0)(0) или использовали бы отдельную переменную для ссылки на текущую базу данных, эта процедура выполнилась бы без каких-либо проблем:
Sub ThisDoesntWork()
Dim db As Database
Dim doc As Document
Set db CurrentDb()
Set doc db.Containers!Tables.Documents(0)
Debug.Print doc.Name
End Sub
Что же все-таки предпочесть при написании программы: CurrentDb или DBEngine(0)(0)? Если вы работаете с базами данных Access, используя средства
автоматизации, то ответ прост: DBEngine(0)(0). Если же вы работаете «внутри»
Access, то вы можете использовать как CurrentDb, так и DBEngine(0)(0). Разумеет-ся, использование функции CurrentDb проще и легче для понимания при про-смотре программного кода. Однако этот метод не так быстр, как хотелось бы.
Эксперименты показали, что получение ссылки с использованием функции
CurrentDb на порядок медленнее получения такой же ссылки посредством опера-тора DBEngine(0)(0). Между этими двумя методами существует одно большое раз-лич ие, которое может повлиять на ваш выбор. Ссылка, полученная посредством функции CurrentDb, всегда актуальна, в то время как ссылку, полученную при по-мощи DBEngine(0)(0), необходимо обновлять посредством метода Refresh перед использованием любой коллекции объекта базы данных. Метод Refresh доста-точ но медленный, поэтому он сразу лишит вас выигрыша в скорости, полученно-го от применения DBEngine(0)(0). Поэтому практически во всех примерах, приве-денных в этой книге, ссылка на текущую базу данных получается посредством
вызова функции CurrentDb.

(с) Гетц и еже с ними...