Интернет-журнал "Домашняя лаборатория", 2007 №4

dbForwardOnly — эта установка определяет набор записей таким образом, что по нему возможно перемещение только вперед (только метод MoveNext может использоваться для перемещения по набору записей);

dbSeeChanges — установка этого значения вызывает появление ошибки, когда какой либо пользователь изменил данные в то время, когда вы их редактируете.

При необходимости установить сразу несколько параметров набора записей, используйте операцию сложения. После изменения свойства Options во время выполнения приложения необходимо применить метод Refresh. Следующий пример иллюстрирует, как в многопользовательской среде открыть набор записей только для чтения исключительно для собственного пользования:

Data1.DatabaseName="C: \VB5\BIBLIO.MDB"

Data1.Options=dbDenyWrite + dbReadOnly

Data1.Refresh.

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

If Data1.Options And dbReadOnly Then…

• ReadOnly

Свойство ReadOnly определяет метод доступа к базе данных, открытой с помощью объекта Data: только для чтения или для чтения-записи.

Синтаксис:data1.ReadOnly=Boolean.

Если свойство ReadOnly установлено в True, то открытая база данных доступна только для чтения и вы, следовательно, не имеете возможности редактировать данные. Если же свойство установлено в False, то база данных открыта для чтения-записи и вы можете делать с данными все, что угодно. По умолчанию свойство ReadOnly устанавливается в False.

После изменения свойства ReadOnly во время выполнения приложения необходимо применить метод Refresh. Следующий пример показывает, как открыть базу данных только для чтения:

Data1.DatabaseName="C: \VB5\BIBLIO.MDB"

Data1.ReadOnly=T rue

Data1.Refresh

Если нет необходимости редактировать данные, то предпочтительно открывать базу данных в режиме только для чтения, так как операции с данными в этом случае выполняются несколько быстрее.

• Recordset

Свойство Recordset определяет набор записей, создаваемый объектом Data.

Синтаксис: data1.Recordset=string.

Параметр string представляет собой текстовую строку, которая определяет набор записей.

После загрузки приложения автоматически создается объект Data. Если у него корректно установлены свойства Connect, DatabaseName, Options, RecordSource, Exclusive, ReadOnly и RecordsetType, то ядро системы управления базами данных Jet database engine создаст новый объект Recordset. То же самое произойдет, если во время выполнения приложения будет применен метод Refresh объекта Data. Доступ к этому объекту — набору записей можно получить через свойство Recordset объекта Data.

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

1. Откройте проект, который использовался для демонстрации возможности добавления записи в базу данных с использованием объекта управления данными.

2. Добавьте на форму командную кнопку и определите ее свойство Caption, как “Удалить”.

3. Добавьте в процедуру обработки события Click командной кнопки следующий фрагмент кода: Private Sub Command1_Click()

Data1.Recordset.Delete

Data1.Refresh

End Sub

4. Запустите приложение. Теперь, используя в приложении объект управления данными, вы можете не только добавлять в базу данных новые записи, но и удалить любую запись.

• RecordsetType

Свойство RecordsetType определяет тип набора записей, созданного объектом Data.

Синтаксис:data1.RecordsetType=value.

Параметр value определяет тип набора записей. Возможные значения параметра value приведены в следующей таблице:

Постоянная ∙ Значение ∙ Описание

vbRSTуpeTable ∙ 0 ∙ Создается набор записей типа таблицы.

vbRSTуpeDynaset ∙ 1 ∙ Создается набор записей динамического типа. Этот тип создается по умолчанию.

vbRSTypeSnapshot ∙ 2 ∙ Создается статический набор записей.

После изменения свойства RecordsetType во время выполнения приложения необходимо применить метод Refresh.

В следующем примере для объекта управления данными Data1 закрывается существующий набор записей и, затем, создается новый набор записей статического типа: