Propiedad Recordset.Restartable (DAO)

Se aplica a: Access 2013, Office 2013

Devuelve un valor que indica si un objeto Recordset admite el método Requery, método que vuelve a ejecutar la consulta en la que se basa el objeto Recordset.

Sintaxis

expresión . Reiniciable

expression Variable que representa un objeto Recordset.

Comentarios

Los objetos Recordset de tipo Table siempre devuelven False.

Compruebe la propiedad Restartable antes de usar el método Requery en un objeto Recordset. Si la propiedad Restartable del objeto está establecida en False, utilice el método OpenRecordset en el objeto base QueryDef para volver a ejecutar la consulta.

Ejemplo

En este ejemplo se muestra la propiedad Restartable con distintos objetos Recordset.

    Sub RestartableX() 
     
     Dim dbsNorthwind As Database 
     Dim rstTemp As Recordset 
     
     Set dbsNorthwind = OpenDatabase("Northwind.mdb") 
     
     With dbsNorthwind 
     ' Open a table-type Recordset and print its 
     ' Restartable property. 
     Set rstTemp = .OpenRecordset("Employees", dbOpenTable) 
     Debug.Print _ 
     "Table-type recordset from Employees table" 
     Debug.Print " Restartable = " & rstTemp.Restartable 
     rstTemp.Close 
     
     ' Open a Recordset from an SQL statement and print its 
     ' Restartable property. 
     Set rstTemp = _ 
     .OpenRecordset("SELECT * FROM Employees") 
     Debug.Print "Recordset based on SQL statement" 
     Debug.Print " Restartable = " & rstTemp.Restartable 
     rstTemp.Close 
     
     ' Open a Recordset from a saved QueryDef object and 
     ' print its Restartable property. 
     Set rstTemp = .OpenRecordset("Current Product List") 
     Debug.Print _ 
     "Recordset based on permanent QueryDef (" & _ 
     rstTemp.Name & ")" 
     Debug.Print " Restartable = " & rstTemp.Restartable 
     rstTemp.Close 
     
     .Close 
     End With 
     
    End Sub