代码解读

PageCount=0
sql="select * from examhouse where subject like '"& subjectview &"' and type like '"& typeadd &"' and question like '%"& mykey &"%'"
set rs=conn.execute(sql)
while not rs.eof
    PageCount=PageCount+1'这里应该是取得总的数据库记录数，不是总页数，这个变量名称是PageCount但并不在计算总页数  
    rs.movenext
wend

PageSize = 10
PageCount=(PageCount+PageSize-1)\PageSize'应该是求得总页数，这种算法头一次看到
Page = CLng(Request("Page"))’这是取得当前页               (代码表示什么意思呢?)
'分页显示
If not Page >1 Then Page = 1
If Page > PageCount Then Page = PageCount
i=page+(page-1)*9
rs.AbsolutePage = Page'设置记录集的当前页
不明白有些人这么写分页要彰显自己算法好？但是这样分页没有ADODB.RecordSet的内部分页来得实在有效，出了错误给自己和别人找麻烦。