?? aspsql2.asp
字號:
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>分頁顯示</title>
</head>
<body>
<%
myconn=" driver={sql server};server=localhost;uid=aspnetname;pwd=123456;database=project"
set myrecord=server.createobject("adodb.recordset")
sqlselect="select * from 項目"
myrecord.open sqlselect,myconn,3
num=cint(request("num"))
if num<1 then num=4
myrecord.pagesize=num
response.Write "<br><table border=1><tr>"
page=cint(request("page"))
if page<1 then page=1
if page>myrecord.pagecount then page=myrecord.pagecount
for i=0 to myrecord.fields.count-1
response.Write "<td>"& myrecord(i).name&"</td>"
next
response.Write "</tr><tr>"
myrecord.absolutepage=page
for t=1 to myrecord.pagesize
if myrecord.eof then exit for
for i=0 to myrecord.fields.count-1
response.Write "<td>"&myrecord(i)&"</td>"
next
response.Write "</tr>"
myrecord.movenext
next
response.Write "</tr></table>"
if page<>1 then
response.Write "<a href=aspsql2.asp?page=1>第一頁</a>"
response.write "<a href=aspsql2.asp?page="&page-1&">上一頁</a>"
end if
if page<>myrecord.pagecount then
response.write "<a href=aspsql2.asp?page="&page+1&">下一頁</a>"
response.write "<a href=aspsql2.asp?page="&myrecord.pagecount&">最后一頁</a>"
end if
response.write "<br>"
for thepage=1 to myrecord.pagecount
if thepage<10 then
response.write "<a href=aspsql2.asp?page="&thepage&">0"&thepage&" </a>"
else
response.write "<a href=aspsql2.asp?page="&thepage&">"&thepage&" </a>"
end if
next
%>
<form name="form1" method="post" action="aspsql2.asp">
<select name="page" id="select1">
<% for y=1 to myrecord.pagecount %>
<option value="<%=y%>"><%=y%></option>
<% next %>
</select>
每頁顯示的記錄個數:
<input name="num" type="text" id="num" value="4" size="10">
<input type="submit" name="Submit" value="提交" >
</form>
</body>
</html>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -