分页问题前几次没发成功这次好了帮忙！！！！！

[复制链接]

ㄣ紸縡のoァ

电梯直达

1^#

发表于 2010-1-14 00:49:37 | 只看该作者回帖奖励

|倒序浏览 |阅读模式

这段代码能搜索到信息，但搜索到的是数据库里所以的信息都放在1个页面上了，无法实现分页，是为什么？？？还有就是搜索出来的页面有超连接，但点机超连接就出现如下信息
错误类型：
ADODB.Recordset (0x800A0E78)
对象关闭时，不允许操作。
/bbs/fenye.asp, 第 19 行
为什么点机下一页不能显示下一页而出现如上提示？？？
<body>

<%
if request.ServerVariables("QUERY_STRING")<>""then
sousuo=request.form("sousuo")
set rs=server.CreateObject("adodb.recordset")
page=request("page")
rs.pagesize=1
if page="" or page<=1 then
page=1
elseif page>=rs.pagecount then
page=rs.pagecount
end if
rs.open"select*from userzl where uid like '%"&sousuo&"%'",conn,1,1
do while not rs.eof
response.Write rs("uid")&"<br>"
rs.movenext
loop
if page<=1 then
response.write"<font size='2'>首页  </font>"
response.write"<font size='2'>上一页  </font>"
else
response.write"<font size='2'><a href=fenye.asp?page=1>首页</a>  </font>"
response.write"<font size='2'><a href=fenye.asp?page="&page-1&">上一页</a>  </font>"
end if
if page>=rs.pagecount then
response.write"<font size='2'>下一页  </font>"
response.write"<font size='2'>尾页  </font>"
else
response.write"<font size='2'><a href=fenye.asp?page="&page+1&">下一页</a>  </font>"
response.write"<font size='2'><a href=fenye.asp?page="&rs.pagecount&">尾页</a>  </font>"
end if
rs.close
set rs=nothing
else
%>
<form name="form1" method="post" action="<%=request.ServerVariables("SCRIPT_NAME")%>?page=1">
<input name="sousuo" type="text" id="sousuo">
<input type="submit" name="Submit" value="搜索">
</form>
</body>
</html>

收藏0

使用道具举报

返回列表

		自动登录	找回密码
密码			注册

分页问题 前几次没发成功 这次好了 帮忙！！！！！

分页问题前几次没发成功这次好了帮忙！！！！！