Recordset.RecordCount为什么返回-1而不是记录数呢？

Dim Cnn as ADODB.Connection
Dim rs as ADODB.Recordset
Dim RecordCounts as long 
set rs=new ADODB.Recordset
StrSQL="select * from tablename"
rs.open strsql,cnn
RecordCounts=rs.RecordCount
可是返回-1，知道的朋友说一下；
不知道的顶一下，谢

5 个解决方案

#1

Dim Cnn as ADODB.Connection
Dim rs as ADODB.Recordset
Dim RecordCounts as long 
set rs=new ADODB.Recordset
rs.cursorlocation=aduseclient '这里添一行试试
StrSQL="select * from tablename"
rs.open strsql,cnn
RecordCounts=rs.RecordCount

#2

' 使用客户端数据游标
 Conn.CursorLocation = adUseClient

在打开数据库的那段代码里面加这么一句

#3

' 使用客户端数据游标
 Conn.CursorLocation = adUseClient

在打开数据库的那段代码里面加这么一句

#4

好了，谢谢，结贴

#5

加载xml文件错误，请跟斑竹联系！！请斑竹生成以下社区的贴子列表！！
roomid:5101
typenum:2