recordset如何返回记录条数？

Question

dim conn as new ado.connection
dim rs as new ado.recordset
conn.open
rs.open "update ***"
如何得到返回记录条数？

Answer 1

dim rsCount as ado.recordset
set rsCount = conn.Execute("SELECT COUNT(*) FROM 表 WHERE 同样的筛选条件")
记录条数 = rsCount(0)

Answer 2

或者用Connection Command执行"update ***"

Answer 3

Execute方法的第2个参数返回的是影响的行数Dim lngAffected As Long
conn.Execute "update ......", lngAffected
MsgBox "影响行数为：" & lngAffected

Answer 4

rs.RecordCount时，记得先设置客户端游标，否则不能得到正确的记录数

Answer 5

如果表中记录很多，用SELECT COUNT(*) FROM tablename就要快很多。否则，就可以用rs.CusorLocation = adUseClient
rs.Open "SELECT * FROM tablename"
rs.MoveLast再从 rs.RecordCount 得到记录数。