Объектная модель DAO рабочей области MS Jet. Объекты и семейства. Пример открытия БД Access

Интерфейсы объектов данных и интерфейсы прикладного уровня программирования.

Кроме ОМ DAO для доступа к данным могут использоваться объектные модели RDO (Remote Data Objects), ADO (ActiveX Data Objects) и SQL-DMO (Distributed Management Object).

DAO лучше подходит для работы с записями в локальной БД MS Access, a RDO – для работы с базами данных SQL Server. Каждая ОМ имеет свой интерфейс (API) или ядро БД.

Существуют три типа интерфейсов прикладного уровня: файловые (включая ISAM), ODBC и OLE DB (приближенных к данным).

Данные, записанные как текст, хранятся в файлах и доступны при использовании традиционного файлового ввода/вывода. Для ускорения операций информацию хранят в двоичном формате индексно-последовательного метода доступа ISAM (Indexed Sequential Access Method).

OLE DB – универсальный интерфейс для всех форматов хранения данных, основанный на технологии COM.

DAO – это СОМ-интерфейс ядра MS Jet. Он был создан для работы с БД Access, FoxPro или dBase, но его можно применять и для доступа к ODBC-совместимым базам данных. Для использования в программе ОМ DAO нужно установить ссылку на объектную библиотеку MS DAO 3.6 Object Library.

Модель DAO, начиная с версии 3.5 (MS Office 97) включает в себя две объектные модели (ОМ), соответствующие двум «рабочим областям» (РО), доступным из любого клиента Automation. В первой ОМ доступ к данным осуществляется с помощью ядра MS Jet, используя РО MS Jet. Во второй ОМ осуществляется прямой доступ к источнику данных ODBC по технологии «клиент-сервер», используя РО ODBCDirect[1] в обход ядра MS Jet, обеспечивая, тем самым, выигрыш в производительности.

[1] ODBCDirect – технология, которая позволяет получить доступ к источникам данных ODBC, непосредственно с помощью методов объектов доступа к данным (DAO), которые окружают ядро базы данных MS Jet

Рис.126. Объектная модель DAO

рабочей области MS Jet

При работе с DAO не нужно создавать объект Workspase – это происходит автоматически.

Dim db As Database, rs As Recordset

' Подключиться к БД и открыть ее можно методом

'OpenDatabase - вернет ссылку на объект Database

Set db = OpenDatabase ("C:\db2.mdb")

Mysql="SELECT * FROM Сотрудники"

Set rs = db. OpenRecordSet (Mysql, dbOpenDynaset, _ dbReadOnly)

'OpenRecordSet возвращает ссылку на объект
'RecordSet. Установив соединение с БД,
'приложение может запросить сведения, добавить
'новые, обновить старые, удалить существующие
'записи, используя объект RecordSet.

'………………………………………………………………

rs.Close

db.Close

Дата добавления: 2014-12-23