بازیابی ردیف های رکوردست

Recordset.GetRows

از متد GetRows برای کپی کردن یک یا چند رکورد از رکوردست استفاده می شود و سریعترین راهیست  که به یکباره میتوان آنها را گرفت و بعد آرایه ی دوبعدی ساخت ، خروجی تابع آرایه ی دو بعدیست البته طبق داکیومنت اکسس که اولی فیلد و دومی شماره ردیف است . 

(varRecords(intField, intRecord

طبق تصویر پائین دومی Start و سومی شماره ی ردیف

 است

(array= recordset.GetRows(Rows, Start, Field

"strSQL="SELECT FirstName,LastName,Title FROM Employees

(Set rstEmployees=CurrentDb.OpenRecordset(strSQL,dbOpenSnapshot

(varRecords = rstEmployees.GetRows(3

intNumReturned = UBound(varRecords, 2) + 1

intNumColumns = UBound(varRecords, 1) + 1

-یا کد زیر را در نظر بگیرید که رکوردها را داخل آرایه می ریزد.

Dim Values As Variant

Values=Rs.GetRows

مثال زیری باز کردن رکوردست به اسم recSales و استفاده از Ubound برای گرفتن

بالاترین عدد آرایه هم تعداد فیلدها هم تعداد ردیف ها

(2)varValues = recSales.GetRows
    (intFieldCount = UBound(varValues, 1
   (intRowCount = UBound(varValues, 2

گام بعدی ایجاد لوپ در RowCount و دوباره ایجاد لوپ در FieldCount و گرفتن دیتاهای رکورد