读书人

对象关闭时不允许操作的有关问题--

发布时间: 2012-04-23 13:17:38 作者: rapoo

对象关闭时,不允许操作的问题--对查询结果分页错误
对查询结果分页,应该是rs.close的问题吧?我也不确定,点击下一页后就报错,大侠们帮我看看。
我的代码如下:
<%
set rs=server.createobject( "adodb.recordset ")

t1=trim(request( "t1 "))
R1=trim(request.form( "R1 "))
if request( "t1 ")= "无关键字 " or request( "t1 ")= " " then
rs.open "select * from baogao where # "& date()& "# > = date_begin and # "&date()& "# < date_end ",conn,1,1

elseif R1= "1 " then
rs.open "select * from baogao where # "& date()& "# > = date_begin and # "&date()& "# < date_end and bgid like '% "&t1& "% ' ",conn,1,1
.
.
.
end if

if rs.eof //此行为报错行 then response.Redirect "error.asp "
response.end
end if

%>
<%
filename= "chaxun_more.asp "
rs.pagesize=24
num=rs.recordcount
maxcount=cint(rs.pagecount)
page=request( "page ")
if page= " " or page <= 0 then page = 1
if cint(page) > cint(maxcount) then page=maxcount
rs.absolutepage=cint(page)
i=0
%>
<tr>
<tr>
<td height= "38 " valign= "middle " >
<table width= "413 ">
<tr>
<td width= "16 " height= "61 ">   </td>
<td width= "385 ">
<%for i=1 to rs.pagesize%>
<div id= "fang ">   </div>
<span style= "float:left; ">
<img src= "image/f_5.gif " width= "3 " height= "3 " align= "middle " >  
<a href= "report1.asp?id= <%=rs( "id ")%> " target= "_blank ">
<span class= "f_4 "> [ <%=rs( "bgid ")%> ]( <%=rs( "company ")%> ) </span> </a> </span>


<%
rs.movenext
if rs.eof then exit for
next
%>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td height= "22 " valign= "middle " >   </td>
</tr>
<td height= "30 " align= "left ">
<div align= "center ">
<span class= "style1 ">
共 <%=num%> 条记录,24条每页,页次:
<font color= "red ">
<%if page= " " then page=0%> <%=page%> /
<%if maxcount= " " then maxcount=0%> <%=maxcount%>
</font>
<%if num> 24 then %>
<a href= " <%=filename%> ?page=1&t1= <%=t1%> &R1= <%=R1%> "> 第一页 </a>
<a href= " <%=filename%> ?page= <%=page-1%> &t1= <%=t1%> &R1= <%=R1%> "> 上一页 </a>
<a href= " <%=filename%> ?page= <%=page+1%> &t1= <%=t1%> &R1= <%=R1%> "> 下一页 </a>
<a href= " <%=filename%> ?page= <%=maxcount%> &t1= <%=t1%> &R1= <%=R1%> "> 尾页 </a>
<%end if%>
</span>
</div>
</td>
</tr>
<%rs.close
set rs=nothing
%>

[解决办法]
什么错
[解决办法]
if request( "t1 ")= "无关键字 " or request( "t1 ")= " " then

elseif R1= "1 " then

可能你以上两个条件都不成立.

即没有执行查询.
[解决办法]
if rs.eof //此行为报错行 then

if rs.eof then

//不能换行的吧
[解决办法]
把最后的一个
<%rs.close
set rs=nothing
%>
去掉就不会出现这样的问题了。

[解决办法]
根本原因就是:你的rs在if rs.eof 之前关上了
[解决办法]
R1=trim(request.form( "R1 "))改成R1=trim(request( "R1 "))试试

读书人网 >ASP

热点推荐