Описание
Возвращает значение, определяющее возможность применения к объекту Recordset метода Requery, который повторно выполняет запрос, лежащий в основе объекта Recordset.
Значение
Возвращаемое значение имеет тип Boolean и содержит значение True, если объект Recordset поддерживает метод Requery. Для табличных объектов Recordset всегда возвращается значение False.
Замечания
Значение свойства Restartable проверяют перед вызовом метода Requery для объекта Recordset. Если данное свойство имеет значение False, то для повторного выполнения запроса следует вызвать метод OpenRecordset для базового объекта QueryDef.
Пример
Следующая программа демонстрирует применение свойства Restartable к различным объектам Recordset.
Sub RestartableX() Dim dbsNorthwind As Database Dim rstTemp As Recordset Set dbsNorthwind = OpenDatabase("Борей.mdb") With dbsNorthwind ' Открывает табличный объект Recordset ' и печатает его свойство Restartable. Set rstTemp = .OpenRecordset("Сотрудники", dbOpenTable) Debug.Print "Табличный набор записей для таблицы 'Сотрудники'" Debug.Print " Restartable = " & rstTemp.Restartable rstTemp.Close ' Открывает объект Recordset из инструкции SQL ' и печатает его свойство Restartable. Set rstTemp = .OpenRecordset("SELECT * FROM Сотрудники") Debug.Print "Объект Recordset, открытый из инструкции SQL" Debug.Print " Restartable = " & rstTemp.Restartable rstTemp.Close ' Открывает объект Recordset сохраненного объекта QueryDef ' и печатает его свойство Restartable. Set rstTemp = .OpenRecordset("Список товаров") Debug.Print "Объект Recordset, открытый из объекта QueryDef (" & rstTemp.Name & ")" Debug.Print " Restartable = " & rstTemp.Restartable rstTemp.Close .Close End With End Sub