Page 110 - 6735
P. 110
Запис.Fields("Оцінка").Value = 4 'ввести значення поля
"Оцінка"
Запис.Update 'оновити
Запис.AddNew 'додати запис
Запис.Fields("Прізвище").Value = "Петров"
Запис.Fields("Оцінка").Value = 3
Запис.Update 'оновити
Запис.Close 'Закрити записи
'Команда SQL вибирає записи з таблиці stud, де Оцінка>3
Sqlstr = "SELECT * FROM stud WHERE (Оцінка>3)"
'Створюємо записи за запитом SQL
Set Запис = БазаДаних.OpenRecordset(Sqlstr, dbOpenDynaset)
'Виведення записів запиту
Запис.MoveFirst 'перейти на перший запис
Do While Not Запис.EOF 'поки не кінець записів
Debug.Print Запис.Fields("Прізвище").Value 'вивести
значення поля "Прізвище"
Debug.Print Запис.Fields("Оцінка").Value 'вивести значення
поля "Оцінка"
Запис.MoveNext 'перейти на наступний запис
Loop
'Закрити запис, базу даних і робочу область
Запис.Close
БазаДаних.Close
РобочаОбласть.Close
End Sub
Microsoft ADO – об'єктний доступ до даних
Microsoft ActiveX Data Objects (ADO) – прикладний програмний
інтерфейс для доступу до даних, оснований на технології
компонентів ActiveX, який є більш універсальним наступником
технології DAO [19, 29, 32, 33, 42]. ADO дозволяє користувачам
розробляти програми для доступу до різних баз даних (реляційних
СУБД, текстових файлів тощо) без необхідності знання про те, як ці
бази даних реалізовані. Основним об'єктом є ADODB.Connection -
110