Question

帮我解释一下这段代码的意思，谢谢

IF Not rs.eof Then
shenheyiCount=rs.recordcount
rs.PageSize=6 '定义显示数目
if not IsEmpty(Request("ToPage")) then
ToPage=CInt(Request("ToPage"))
if ToPage>rs.PageCount then
rs.AbsolutePage=rs.PageCount
intCurPage=rs.PageCount
elseif ToPage<=0 then
rs.AbsolutePage=1
intCurPage=1
else
rs.AbsolutePage=ToPage
intCurPage=ToPage
end if
else
rs.AbsolutePage=1
intCurPage=1
end if
intCurPage=CInt(intCurPage)

k=1
do while Not rs.eof and k<2
麻烦尽量把语句解释一下

Answer 1

一个分页的算法而已