Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Visual Basic 6.0~03.doc
Скачиваний:
0
Добавлен:
01.05.2025
Размер:
4.48 Mб
Скачать

Додавання записів

Хоча в цьому прикладі така можливість не була потрібна, в більшості додатків в набори додаються нові записи. З об'єктами наборів записів ADO це завдання виконується надзвичайно просто. Для цього в програмі слідує викликається метод .AddNew:

rs.AddNew

rs("Author) = "Doe, John" rs("Au_ID") = 123456

rs.Update

Усе дуже просто. Коли вам вимагається створити новий запис, ви викликаєте метод .AddNew. Він створює порожній запис, в який потім заносяться дані. Це можна зробити декількома способами, включаючи наступні:

Rs("Author") = "Doe, John"

Rs!Author = "Doe, John"

Rs.Fields(1) = "Doe, John"

Усі вони еквівалентні, і вибір залежить лише від вашого особистого смаку. Особисто я віддаю перевагу першому способу, тому що він виглядає найочевидніше. Я точно знаю, яке поле оновлюється, а оскільки ім'я поля поміщене в лапки, воно може містити пропуски.

Після занесення даних в запис слід відновити набір, викликавши метод . Update.

Оновлення записів

Процес оновлення записів нагадує процес додавання, проте цього разу вам не доведеться викликати метод .AddNew. Досить перемістити курсор бази даних до потрібного запису, змінити дані і викликати метод . Update. Наприклад:

Rs("Author") = "Brown, Steve"

Rs("Au_ID") = 373737

Rs.Update

ПРИМІТКА. Якщо вам доводилося працювати з об'єктами DAO, можливо, ви звикли викликати метод . Edit для переходу до редагування даних. Він не підтримується об'єктами ADO.

Видалення записів

Видалення записів в ADO виконується так само просто. Усе, що від вас потрібно це встановіть курсор бази даних на записі, що видаляється, і викликати метод . Delete. Програма виглядає приблизно так:

‘ Створити запит

sql = "select *from authors where [Author] = 'Brown, Steve""

‘ Відкрити набір записів

Set rs = New ADODB.Recordset

With rs

..Open sql, cn, adOpenForwardOnly, adLockReadOnly

If rs.RecordCount > 0 Then

rs.Delete

End If

‘ Закрити набір записів

..Close

End With

‘ Знищити об'єкт набору записів

Set rs = Nothing

ПІДКАЗКА. Переходите на використання ADO, оскільки Microsoft розвиває свої технології роботи з даними саме в цьому напрямі. Ви не лише працюватимете з останніми технологічними новинками, але і зможете переносити свої застосування на інші джерела даних з мінімальними змінами коду (чи взагалі без змін).Більше того, ADO навіть дозволяє організувати обмін даними між базою і Web - сторінкою!

Тепер ви умієте створювати бази даних Access і працювати з ними різними способами. Навички, описані в цьому уроці, допоможуть вам працювати з базами даних в майбутніх застосуваннях. Хоча можливості нової версії Visual Data Manager помітно зросли, все ж я рекомендував би придбати Microsoft Access, якщо ви не зробили цього раніше. Access має багато можливостей, що спрощують створення бази даних навіть в порівнянні з описаним вище нескладним процесом. А найприємніше - ваші бази даних залишаться сумісними з Visual Basic!

Навчившись працювати з файлами і базами даних, ви зможете узяти дані зі свого застосування і зберегти їх для наступного завантаження або Друкуванняу, а також скористатися ними для збереження і вибірки робочих параметрів додатка. Не шкодуйте часу на експерименти з Visual Data Manager. Він має багато можливостей, не згадуваних в цьому уроці (повний опис зажадав би окремої книги). Об'єднуючи можливості Visual Basic по програмуванню і роботі з базами даних, ви зможете створювати досить потужні застосування. Наступний урок присвячений третьому важливому аспекту будь-якого застосування - Друкуванняу.

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]