Часть 2. Объектная модель доступа к данным

Объектная модель Microsoft ActiveX Data Objects (ADODB)

Объекты ADO обеспечивают доступ к самым разным форматам данных (от текстовых файлов до распределенных БД) , так как данный подход основан на OLE DB – новейшей технологии доступа к данным.

Существует три объектных модели ADO

· Microsoft ActiveX Data Objects (ADODB) -Управление данными. Обеспечивает доступ к источнику данных и возможность отбирать для просмотра и изменять эти данные . Однако не дает возможности изменять структур таблиц и других объектов источника данных

· Microsoft ActiveX Data Objects Extensions for DDL and Security (ADOX) -Определение данных и защита. Позволяет программно изменять структур таблиц и других объектов источника данных (добавлять и удалять таблицы, изменять структуру таблиц, создавать и изменять запросы, представления и хранимые процедуры, а также управлять схемой защиты данных

· Microsoft Jet and Replication Objects (JRO) -Репликация и службы ядра БД Jet . Позволяет создавать, модифицировать и синхронизировать реплики.

Иерархия объектовMicrosoft ActiveX Data Objects (ADODB)

Объект Connection открывает сеанс обмена данными. Для доступа к любым объектам из иерархии ADO необходимо создать объект Connection, который будет использоваться для получения данных

Объект Command служит для выполнения запросов различных типов.

Объект Recordset представляет собой набор записей и позволяет осуществлять навигацию по записям и манипулировать с данными в нем.

Семейство объектов Fields, каждый из которых представляет собой поле (столбец) в наборе записей Recordset.

Перед началом работы необходимо проверить ссылки на объектные модели при помощи меню Tools-References. В зависимости от версии номер библиотеки может несколько отличаться.

Необходимо помнить следующее правило пользования объектной переменной. Для того чтобы иметь возможность пользоваться объектной переменной необходимо:

Объявить объектную переменную

Dim [Private | Public | Static] ИмяОбъектнойПеременной As <имяКласса>

Инициировать, т.е. установить на какой объект она указывает

Set ИмяОбъектнойПеременной =СсылкаНаОбъект

И только после этого можно использовать объектную переменную.

Пример объявления объектной переменной cnn для установки соединения с текущей базой.

Dim cnn As ADODB.Connection

Set cnn=CurrentProject.Connection

Использование SQL запросов