如果你只是想查询记录数量的话不要这么查，应该使用
select count(*) from Table where ……
这种方式。
也就是：
rs.open "select * from Table",conn,1,1
改为====
rs.open "select count(*) from Table",conn,1,1
然后，
rs.recordcount
改为===
rs(0)
这样可以避免把所有数据都传输到内存中，只要一条记录一个字段就可以了。
输出记录集的话，对记录及进行分页。分页尽量采用select * top N from table…这种方式，而不要一次读取全部记录集再进行分页，那样的话大批量数据会很慢。