获得记录集的记录数RecordCount-张志
Access软件网QQ交流学习群(群号码198465573),欢迎您的加入!
首页 >技术文章> Access数据库-模块/函数/VBA


获得记录集的记录数RecordCount

发表时间:2024/1/1 10:46:49 评论(0) 浏览(1527)  评论 | 加入收藏 | 复制
   
摘 要:用ADO访问记录时,CursorType的默认值是adOpenForwardOnly,只向前的游标不支持RecordCount属性。
正 文:
有一个【tbl员工明细】表,当我们采用ADO访问时,利用RecordCount来获得记录数,下面的代码不能成功。
    '需要在VBA引用中引用 Microsoft ActiveX Data Objects 2.8,这里的2.8是版本号,大家可引用你有的版本号
    Dim rst As ADODB.Recordset
    Set rst = New ADODB.Recordset
    rst.ActiveConnection = CurrentProject.Connection
    rst.Open "select * from tbl员工明细"
    Me.txt记录数 = rst.RecordCount
    rst.Close
    Set rst = Nothing


对代码作一下改动,就可以支持RecordCount属性了,示例代码如下:
    '需要在VBA引用中引用 Microsoft ActiveX Data Objects 2.8,这里的2.8是版本号,大家可引用你有的版本号
    Dim rst As ADODB.Recordset
    Set rst = New ADODB.Recordset
    rst.ActiveConnection = CurrentProject.Connection
    rst.CursorType = adOpenStatic 'CursorType 设置为 adOpenStatic,由于静态游标支持RecordCount,所以可以得到记录数
    rst.Open "select * from tbl员工明细"
    Me.txt记录数2 = rst.RecordCount
    rst.Close
    Set rst = Nothing


点击下载此附件


Access软件网交流QQ群(群号:198465573)
 
 相关文章
常见问答
技术分类
相关资源
文章搜索
关于作者

张志

文章分类

文章存档

友情链接