Question

我知道如何使用访问VBA来获取记录集中记录的总数。这就是我在下面做的，但是我需要把我的主要文件和每50条记录中的rs分成子记录集。意思是rs.RecordCount = 200 - 然后我想创建，rs1，rs2，rs3，rs4和每个的recordCount应该是50。

如何将记录集动态拆分为子记录集，如上所述？这就是我在主记录集中得到计数的方法

    Set rs = CurrentDb.OpenRecordset("Select firen, daja, globaltwo", dbOpenDynaset)

With rs
   If Not .EOF And Not .BOF Then
      .MoveLast
      .MoveFirst
      Do While Not .EOF
        qty = rst.RecordCount
        Debug.Print qty
      Loop
   End If
End With

rs.Close
Set rs = Nothing

Answer 1

您可能想查看OLEDB提供程序是否支持分页。见https://support.microsoft.com/en-us/help/202125/how-to-page-through-a-recordset-from-asp

建议访问的Access 97数据库的给定链接确实支持这一点，即使代码是Active Server页面，PageSize属性仍可供VBA客户端使用。

每50条记录拆分记录集

1 个答案: