Ms access access vba代码返回空记录集,尽管表中有记录
我在VBA中有此代码,但它返回一个空记录集Ms access access vba代码返回空记录集,尽管表中有记录,ms-access,vba,Ms Access,Vba,我在VBA中有此代码,但它返回一个空记录集 Sub total_disc() Dim dbs As DAO.Database Dim rst As DAO.Recordset Set rst = CurrentDb.OpenRecordset("pre_pl") rst.MoveFirst 其中pre_pl是一个包含超过一百万条记录的表。尽管如此,我还是什么都没有得到 你知道我遗漏了什么吗 谢谢 您可能需要检查表的大小。Access中表的限制为2GB,而记录集的限制仅为1GB。如果您
Sub total_disc()
Dim dbs As DAO.Database
Dim rst As DAO.Recordset
Set rst = CurrentDb.OpenRecordset("pre_pl")
rst.MoveFirst
其中pre_pl是一个包含超过一百万条记录的表。尽管如此,我还是什么都没有得到
你知道我遗漏了什么吗
谢谢 您可能需要检查表的大小。Access中表的限制为2GB,而记录集的限制仅为1GB。如果您有数百万条记录,并且每条记录中都有大量数据,那么您可能超出了记录集的限制,而不是表的限制。尝试创建一个查询,将数据限制在更窄的搜索范围内,然后看看它是否有效 访问限制可在此处找到:
您如何判断rst=无?在您的
rst.MoveFirst
之后插入MsgBox rst.RecordCount
,看看您得到了什么。因为我复制并粘贴了你的代码,所以用我的一个表替换这个名称,效果很好。显然,尽管表正常,我还是超出了记录集的限制。。。。谢谢你的帮助!