請幫忙解釋一段分頁代碼
1       <%if   not   rs.eof     then
2       tel=rs.recordcount
3     shum=15
4     rs.pagesize=shum
5       maxpage=rs.pagecount
6       requestpage=clng(request( "p "))
7       if   requestpage= "   "   or     requestage=0   then
8       requestpage=1
9       end   if
10       if   requestpage> maxpage   then
11       requestpage=maxpage
12       end   if
13       if   not   requestpage=1   then
14       rs.move(requestpage-1)*rs.pagesize
15       end   if
16       for   i=1   to   rs.pagesize     and     rs.eof
17       %>
從第2行到第14行，請幫忙逐行解釋，謝謝！幫幫我這個初學者


------解决方案--------------------
1 <%if not rs.eof then
2 tel=rs.recordcount '取得数据库的记录数
3 shum=15 '设一页显示记录数
4 rs.pagesize=shum
5 maxpage=rs.pagecount '最大页数
6 requestpage=clng(request( "p ")) '获得当前页码
7 if requestpage= " " or requestage=0 then '如果没有或为0页
8 requestpage=1 '为第一页
9 end if
10 if requestpage> maxpage then '如果显示页数大于最大页数
11 requestpage=maxpage '为最大页码
12 end if
13 if not requestpage=1 then ’如果不为第一页时
14 rs.move(requestpage-1)*rs.pagesize '获得当前页的第一个记录
15 end if
16 for i=1 to rs.pagesize and rs.eof
17 %>