rs.pagesize=15‘每頁顯示數目
page=CLng(Request("page"))
NumRecord=rs.recordcount
NumPage=rs.pagecount
if page<1 then page=1
NowPage=page
rs.absolutepage=page
for i=1 to rs.pagesize
%>