首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 网站开发 > ASP >

对象关闭时,不允许操作的有关问题--对查询结果分页异常

2012-04-23 
对象关闭时,不允许操作的问题--对查询结果分页错误对查询结果分页,应该是rs.close的问题吧?我也不确定,点

对象关闭时,不允许操作的问题--对查询结果分页错误
对查询结果分页,应该是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 "> &nbsp; </td>
<td   width= "385 ">
<%for   i=1   to   rs.pagesize%>
<div   id= "fang "> &nbsp; </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 "   > &nbsp; </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 "))试试

热点排行