Объекты доступа к данным DAO - Data Access Object

Date: 2015-10-07; view: 421.

Form2

Form1

' Последовательное считывание данных таблицы software

' в массив текстового поля. Щелчком на правой

' кнопке элемента Data и последовательным

' нажатием командной кнопки Command1 (Caption = Lesen1)

' присвоить текущему элементу массива

' mass(n, j) текущее значение свойства Text

' элементов массива текстового поля

Private Sub Command1_Click()

mass (n, 1) = Text1(1): mass (n, 2) = Text1(2)

mass (n, 3) = Text1(3): mass (n, 4) = Text1(4)

mass (n, 5) = Text1(5): mass (n, 6) = Text1(6)

n = n + 1 ' увеличить значение переменной-счeтчик на 1

End Sub

' автоматическое считывание данных в массив

' (Caption = Lesen2)

Private Sub Command2_Click()

For n = 0 To 8

mass (n, 1) = Text1(1): mass (n, 2) = Text1(2)

mass (n, 3) = Text1(3): mass (n, 4) = Text1(4)

mass (n, 5) = Text1(5):mass (n, 6) = Text1(6)

' MoveNext - метод, обеспечивающий автоматический

' переход к следующей записи

Data1.Recordset.MoveNext

Next n

End Sub

' Методы MoveFirst, MoveLast, MoveNext, MovePrevious

' находят в указанном объекте Recordset соответствующую

' запись и делают еe текущей

Private Sub Command3_Click()

Unload Me

Form2.Show

End Sub

' вывод данных двумерного массива на экран в

' массив поля списка

Private Sub Command1_Click()

For i = 0 To 8

For j = 1 To 6

List1(i).List(j - 1) = mass (i, j)

Next j, i

End Sub

' нахождение максимальной цены продукта и вывод в

' поле метки результата

Private Sub Command2_Click()

max = mass(0,3)

For k = 1 To 8

If mass (k, 3) > max Then max = mass (k, 3)

Next k

Label1.Caption = max

End Sub

Объекты доступа к данным - это объекты, представляющие структуру базы данных и её содержимое. Программист может использовать DAO для создания и изменения таблиц и запросов, для защиты баз данных или для доступа к данным внешнего источника. DAO позволяет обрабатывать из проекта Visual Basic данные, находящиеся в базе данных.

Для работы с источниками данных используется иерархия объектов Microsoft Jet,

· DBEngine - объект самого верхнего уровня в иерархии объектов Microsoft Jet обеспечивает связь приложения с СУБД MicrosoftDBMS. Система управления базами данных - это множество процедур; происходит взаимодействие с набором процедур-трансляторов и запросы пользователя переводятся на язык, воспринимаемый базой данных. Процедуры-трансляторы есть для баз данных формата Microsoft Access, FoxPro и т.д.; имеются трансляторы для источников данных ODBC (Open Databasе Connectivity - открытое взаимодействие с базами данных). С помощью машины Microsoft Jet можно обращаться к файлам данных любого формата (если есть соответствующие процедуры-трансляторы). Объект DBEngine имеет свойства и методы и содержит коллекции - объекты одного типа,

· коллекция Properties содержит свойства объекта DBEngine,

· коллекция Workspaces. Объект Workspace - это рабочее пространство, которое определяет именованный сеанс работы пользователя. Коллекция Workspaces содержит все определeнные рабочие пространства. Workspaсe имеет свойства (Name - имя рабочего пространства, UserName - имя пользователя, IsolateODBCTrans используется для контроля за числом соединений ODBC, установленных с базой данных во время сеанса) и 2 метода - CreateDatabase и OpenDatabase,

· Users - учетные записи пользователей,

· Groups - учетные записи группы пользователей,

· коллекция Databases содержит все объекты Database - базы данных, открытые для данного объекта Workspace. ОбъектDatabase создается каждый раз, когда пользователь открывает базу данных с помощью метода OpenDatabase. Содержит несколько свойств и методов (Name, Connect, : Connection ), например, метод OpenRecordset служит для доступа к таблицам баз данных,

· TableDef - определение таблицы,

· QueryDef - определение запроса,

· Recordset - объект, содержащий наборы записей; имеется большое количество свойств и методов, доступность которых зависит от того, в каком рабочем пространстве был создан объект Recordset - Microsoft Jet или ODBCDirect. Технология ODBCDirect - модель доступа к данным ODBC. Частью этой модели доступа является объект Connection. Эта модель даeт возможность программисту обращаться к источникам данных ODBC напрямую, не используя объекты данных Microsoft Jet.

· Relation - содержит информацию об установленных между таблицами отношениях (указание полей и типа связей),

· Field - содержит информацию о поле таблицы, содержит коллекцию Properties, имеет несколько свойств и методов,

· Index - определение индекса (Index - это совокупность перекрестных ссылок между полями таблицы, они создаются для ускорения поиска записей).

Объекты DAO используются в определeнном порядке. Сначала с помощью ключевого слова Set формируется Workspace, затемDatabase, Recordset и другие объекты. Для открытия базы данных используется метод OpenDatabase объекта Workspace, а для открытия таблицы - метод OpenRecordset объекта Database. Для получения доступа к определенному количеству строк таблицы используется метод GetRows(numrows) объекта Recordset, numrows - это число строк. Строки/столбцы нумеруются, начиная с 0.