Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/ms-access/4.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Ms access access vba代码返回空记录集,尽管表中有记录_Ms Access_Vba - Fatal编程技术网

Ms access access 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。如果您

我在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。如果您有数百万条记录,并且每条记录中都有大量数据,那么您可能超出了记录集的限制,而不是表的限制。尝试创建一个查询,将数据限制在更窄的搜索范围内,然后看看它是否有效

访问限制可在此处找到:

您如何判断rst=无?在您的
rst.MoveFirst
之后插入
MsgBox rst.RecordCount
,看看您得到了什么。因为我复制并粘贴了你的代码,所以用我的一个表替换这个名称,效果很好。显然,尽管表正常,我还是超出了记录集的限制。。。。谢谢你的帮助!