Propiedad Recordset2.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

Expresión Variable que representa un objeto Recordset2 .

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 Recordset2
    
       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