vb+access 求问怎样返回一个查询结果的总数值？该怎么解决

vb+access 求问怎样返回一个查询结果的总数值？
各位高人，怎样才能返回一个查询结果的总数值？
例如：
有表table,共有20行数据

Dim   rs   As   New   ADODB.Recordset
Dim   conn   As   New   ADODB.Connection


sql= "select   *   from   table "
set   rs=   conn.execute   (sql)

可   rs.RecordCount为什么会是   -   1?
怎样能返回rs的查询结果数值呢？
我用for   i   =   0   to   rs.RecordCount
                .
                .
                .
            next   i
时，循环语句不能运行？
应该怎么办呢？？？
谢谢高人了！！！


[解决办法]
--以adOpenKeyset方式打开记录集

Rs.Open sql, conn , adOpenKeyset, adLockOptimistic