ASP查询结果分页显示输入页码 20
<html><head><title>查询</title></head><body><%name=request("name")setconn=server.create...
<html>
<head>
<title>查询</title>
</head>
<body>
<%
name=request("name")
set conn=server.createobject("ADODB.connection")
conn.open"driver={Microsoft Access Driver (*.mdb)};dbq="&server.Mappath("student.mdb")
set rs=server.CreateObject("ADODB.Recordset")
sql="select * from chengji where 姓名 like'%"&name&"%'"
rs.Open sql,conn,3,2
rs.Pagesize=2
%>
<%
if name<>""then
sql=sql&"where 姓名 like'%"&name&"%'"
end if
response.write"<center><table border=4 bordercolor=orange width=""80%"">"
response.write"<tr bgcolor=orange>"
%>
<%
If Request("page") <> "" Then
Page=Clng(Request("page"))
if page<1 then page=1
if page>rs.pagecount then page=rs.pagecount
else
page=1
end if
rs.AbsolutePage=Page
for i=0 to rs.fields.count-1
response.write"<td>"&rs.fields(i).name&"</td>"
next
response.write"</tr>"
For I = 0 To rs.PageSize-1
If rs.EOF OR rs.BOF Then Exit For
response.write"<tr>"
Response.Write("<TD>" & rs("学号") & "</TD>")
Response.Write("<TD>" & rs("姓名") & "</TD>")
Response.Write("<TD>" & rs("ASP") & "</TD>")
Response.Write("<TD>" & rs("CRM") & "</TD>")
Response.Write("<TD>" & rs("ENGLISH") & "</TD>")
Response.Write("<TD>" & rs("E-MARKETING") & "</TD>")
Response.Write("<TD>" & rs("MIS") & "</TD>")
response.write"</tr>"
rs.movenext()
Next
response.write"</table></center>"
Response.Write("<center>"&"当前第" & Page & "页,共" & rs.PageCount & "页"&"</center>")
%>
<div align="right">
<hr>
<%
if page<>1 then
response.write"<A href=v2.asp?name="&name&"&page=1>第一页</A>"
response.write"<A href=v2.asp?name="&name&"&page="&(page-1)&">上一页</A>"
end if
if page<>rs.pagecount then
response.write"<A href=v2.asp?name="&name&"&page="&(page+1)&">下一页</A>"
response.write"<A href=v2.asp?name="&name&"&page="&rs.pagecount&">最后一页</A>"
end if
%>
<form action="v2.asp" method="get">
<p>输入页数:<input type="text" name="page" size="3">页数:<font color="red"><%=page%>/<%=rs.pagecount%></font>
</p>
</form>
</div>
</body>
</html>
为什么输入页码的时候不能正确显示'查询结果'的另外一页,只能显示全部数据的下一页~~我该如何改进? 展开
<head>
<title>查询</title>
</head>
<body>
<%
name=request("name")
set conn=server.createobject("ADODB.connection")
conn.open"driver={Microsoft Access Driver (*.mdb)};dbq="&server.Mappath("student.mdb")
set rs=server.CreateObject("ADODB.Recordset")
sql="select * from chengji where 姓名 like'%"&name&"%'"
rs.Open sql,conn,3,2
rs.Pagesize=2
%>
<%
if name<>""then
sql=sql&"where 姓名 like'%"&name&"%'"
end if
response.write"<center><table border=4 bordercolor=orange width=""80%"">"
response.write"<tr bgcolor=orange>"
%>
<%
If Request("page") <> "" Then
Page=Clng(Request("page"))
if page<1 then page=1
if page>rs.pagecount then page=rs.pagecount
else
page=1
end if
rs.AbsolutePage=Page
for i=0 to rs.fields.count-1
response.write"<td>"&rs.fields(i).name&"</td>"
next
response.write"</tr>"
For I = 0 To rs.PageSize-1
If rs.EOF OR rs.BOF Then Exit For
response.write"<tr>"
Response.Write("<TD>" & rs("学号") & "</TD>")
Response.Write("<TD>" & rs("姓名") & "</TD>")
Response.Write("<TD>" & rs("ASP") & "</TD>")
Response.Write("<TD>" & rs("CRM") & "</TD>")
Response.Write("<TD>" & rs("ENGLISH") & "</TD>")
Response.Write("<TD>" & rs("E-MARKETING") & "</TD>")
Response.Write("<TD>" & rs("MIS") & "</TD>")
response.write"</tr>"
rs.movenext()
Next
response.write"</table></center>"
Response.Write("<center>"&"当前第" & Page & "页,共" & rs.PageCount & "页"&"</center>")
%>
<div align="right">
<hr>
<%
if page<>1 then
response.write"<A href=v2.asp?name="&name&"&page=1>第一页</A>"
response.write"<A href=v2.asp?name="&name&"&page="&(page-1)&">上一页</A>"
end if
if page<>rs.pagecount then
response.write"<A href=v2.asp?name="&name&"&page="&(page+1)&">下一页</A>"
response.write"<A href=v2.asp?name="&name&"&page="&rs.pagecount&">最后一页</A>"
end if
%>
<form action="v2.asp" method="get">
<p>输入页数:<input type="text" name="page" size="3">页数:<font color="red"><%=page%>/<%=rs.pagecount%></font>
</p>
</form>
</div>
</body>
</html>
为什么输入页码的时候不能正确显示'查询结果'的另外一页,只能显示全部数据的下一页~~我该如何改进? 展开
4个回答
展开全部
<form action="v2.asp" method="get">
<p>输入页数:<input type="text" name="page" size="3">页数:<font color="red"><%=page%>/<%=rs.pagecount%></font>
</p>
</form>
这段代码是如何提交的?
你没有提供按钮或者联接提交你的这个表单,自然无法实现你的功能。
另外,你的request("name") 是如何得到的? GET? POST? COOKE? SESSION?这样获取可能引发意外的错误,而且耗费资源。在转页的时候,确保你的这个参数可传递至新页面。
<p>输入页数:<input type="text" name="page" size="3">页数:<font color="red"><%=page%>/<%=rs.pagecount%></font>
</p>
</form>
这段代码是如何提交的?
你没有提供按钮或者联接提交你的这个表单,自然无法实现你的功能。
另外,你的request("name") 是如何得到的? GET? POST? COOKE? SESSION?这样获取可能引发意外的错误,而且耗费资源。在转页的时候,确保你的这个参数可传递至新页面。
展开全部
因为你在输入页码的时候没有带上你的条件参数,如name的值,所以你每一次提交的时候都是默认的搜索全部了
你可以在后面的form里加上一些隐藏的字段
<input type=hiden value=<%=request(\"name\")%> name=\"name\">
这样就可以了
你可以在后面的form里加上一些隐藏的字段
<input type=hiden value=<%=request(\"name\")%> name=\"name\">
这样就可以了
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
rs的记录指针位置不正确
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
好长哦
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询