tatalrecord=rs.recordcount ‘獲取記錄總數目
tatalpages=rs.pagecount ‘獲取分頁(yè)的數目
rs.movefirst
----------------------------
nowpage=request("page") ‘用request獲取當前頁(yè)數，注意page是自己定義的變量并非函數
--------------------------
if nowpage&"x"="x" then ‘處理頁(yè)碼為空時(shí)的情況
nowpage=1
else
nowpage=cint(nowpage) ‘將頁(yè)碼轉換成數字型
end if
--------------------------------
rs.absolutepage=nowpage ‘將指針移動(dòng)到當前顯示頁(yè)的第一條記錄
-------------------------------
%>
---------------------------------------------
<%
n=1
while not rs.eof and n<=rs.pagesize
response.Write(rs("user") & "<br>")
response.Write(rs("tt") & "<br>")
n=n+1
rs.movenext ‘顯示頁(yè)面的數據
wend
%>
-------------------------------------------
共:<%=tatalpages%>頁(yè) 當前為:<%=nowpage%>頁(yè)
<%if nowpage>1 then%>
<a href="fy.asp?page=<%=nowpage-1%>">上一頁(yè)</a>
<%else%>
上一頁(yè)
<%end if%>
<%for k=1 to tatalpages%>
<%if k<>nowpage then %>
<a href="fy.asp?page=<%=k%>"><%=k%></a>
<%else%>
<%=k%>
<%end if%>
<%next%><<%if nowpage < tatalpages then%>
<a href="fy.asp?page=<%=nowpage+1%>">下一頁(yè)</a>
<%else%>
下一頁(yè)
<%end if%> ‘加上頁(yè)碼連接
<%if nowpage<>1 then%>
<a href="fy.asp?page=<%=1%>"> 首頁(yè)</a>
<%else%>
首頁(yè)
<%end if%>
<%if nowpage<>tatalpages then %>
<a href="fy.asp?page=<%=tatalpages%>">末頁(yè)</a>
<%else%>
末頁(yè)
<%end if%>
本站僅提供存儲服務(wù)，所有內容均由用戶(hù)發(fā)布，如發(fā)現有害或侵權內容，請
點(diǎn)擊舉報。
