Set CursorType to adOpenKeyset : Recordset Cursor « Access « VBA / Excel / Access / Word






Set CursorType to adOpenKeyset

 
Sub StaticRecordset1()
    Dim rst As ADODB.Recordset
    Set rst = New ADODB.Recordset

    rst.ActiveConnection = CurrentProject.Connection
    rst.Open "Select * from Employees", CursorType:=adOpenKeyset
    Debug.Print rst.RecordCount
    rst.Close
    Set rst = Nothing
End Sub

 








Related examples in the same category

1.Navigate through a recordset
2.Move the resultset cursor with MoveNext method
3.Moving Around in a Recordset
4.Move cursor in a Recordset with MoveNext
5.Supplying the CursorType as a Parameter of the Open Method
6.Using the Recordset Movements() Methods on a Recordset Object
7.Moving Through the Records in a Recordset:MoveFirst - To the first record in a recordset
8.Moving Through the Records in a Recordset:MoveLast - To the last record in a recordset
9.Moving Through the Records in a Recordset:MovePrevious - To the previous record in a recordset
10.Moving Through the Records in a Recordset:MoveNext - To the next record in a recordset
11.Set CursorType to adOpenForwardOnly
12.Set CursorType to adOpenStatic
13.Set CursorType to adOpenDynamic
14.Supplying the CursorType as a Property of the Recordset Object
15.Designating the Cursor Location
16.Set CursorLocation to adUseServer
17.Set Cursor Location to adUseClient
18.Check after using the MoveNext method whether the end of the file has been reached
19.moves 5 records backward from the current record in a DAO recordset: