📄 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 + -