一般的记录循环方式:

Do while not rs.eof
……
rs.movenext
loop

结果是每个循环中数据库都要进行一次数据结束测试。在大量的记录的情况下, 浪费的时间相当大。 而使用以下的代码, 可以提高近 1/3 的速度:

rs.movelast
intRecCount=rs.RecordCount
rs.movefirst

for intCounter=1 to intRecCount
………
rs.movenext
next intCounter

Leave a Reply

Your email address will not be published. Required fields are marked *

This site uses Akismet to reduce spam. Learn how your comment data is processed.