dim rs as adodb.recordset
...
rs.open "select * from sometable",conn,3,1
或
rs.open "select * from sometable",conn,1,1==>rs.recordcount或者
set rs = conn.execute ("select count(*) 'count' from sometable")
===>
rs('count').value
...
rs.open "select * from sometable",conn,3,1
或
rs.open "select * from sometable",conn,1,1==>rs.recordcount或者
set rs = conn.execute ("select count(*) 'count' from sometable")
===>
rs('count').value
select count(1) from yourtable
---------------------------------
效率最高
++++++
用法:
select count() from 表
返回值为表中记录总数
+++++
msgbox rs.fields(0)
即弹出记录总数
...
RecordSet.MoveLast
RecordSet.RecordCount
... :)