?? pg.asp
字號:
<%
rs.pagesize=10
pagecount=rs.pagecount
page=int(request.QueryString("page"))
if page<1 then page=1
if request.QueryString("page")="" then
page=1
end if
rs.AbsolutePage=page
%>
<%
if Page<>1 then
response.write "<a href=?page=1>首頁</a> "
response.write "<a href=?page="+cstr(Page-1)+">上一頁</a> "
else
Response.Write "首頁 上一頁 "
end if
if Page<>pagecount then
response.write "<a href=?page="+cstr(Page+1)+">下一頁</a> "
response.write "<a href=?page="+cstr(pagecount)+">尾頁</a> "
else
Response.Write "下一頁 尾頁 "
end if
%>
<% for i=1 to pagecount %>
<% if cstr(i)=request.querystring("page") then
response.write(cstr(i))
else
response.write" <a href=?page="+cstr(i)+">"+cstr(i)+"</a> "
end if
%>
<% next %>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -