FIX: GetRows Method of ADO Object Returns Incorrect Value

ID: Q198528

The information in this article applies to:

• ActiveX Data Objects (ADO), version 2.0

SYMPTOMS

The GetRows method of an ADO recordset object moves the record pointer forward one row too many when dealing with greater than 100 rows. GetRows simply places the records from the recordset object into an array. After calling GetRows, the next unread record is supposed to become the current record. When getting 1000 rows, for example, the next record should be 1001, but instead it places the user on record 1002.

RESOLUTION

The user can call 100 records or less with GetRows rather then greater than 100.

STATUS

Microsoft has confirmed this to be a bug in the Microsoft products listed at the beginning of this article. This behavior is fixed in Active Data Objects version 2.1.

MORE INFORMATION

Steps to Reproduce Behavior

1. Create a Standard EXE project in Visual Basic. Form1 is created by

   default.

3. Add the following code to the click event of the command button. This

   assumes that you have a DSN called "Test" which points to an Access
   table called "test1" with greater then 1000 records. (Create table test1
   in an access database with one column c1 (number)-Insert more than
   thousand records into the same):

      Dim conn As Object, rs As Object
      Dim myArray As Variant
      Set conn = CreateObject("ADODB.Connection")
      conn.open ("DSN=Test")
      Set rs = conn.Execute("select * from test1")

      myArray = rs.getrows(1000)
      ' uncomment the following line to receive correct value in MsgBox.
      'myArray = rs.getrows(100)

      MsgBox rs("c1")
      rs.Close
      Set rs = Nothing
      conn.Close
      Set conn = Nothing

Additional query words:

Keywords          : kbnokeyword kbADO200bug kbADO210fix kbMDAC 
Version           : WINDOWS:2.0
Platform          : WINDOWS
Issue type        : kbbug
Solution Type     : kbfix

Last Reviewed: January 8, 1999