职业IT人-IT人生活圈

 找回密码
 成为会员
搜索
查看: 1185|回复: 0

ADODB.Field 错误 '80020009' 对象关闭时不允许操作

[复制链接]
七夜魔君 发表于 2009-8-27 09:36 | 显示全部楼层 |阅读模式
<%
lb = request(\"lb\")
if lb=\"\" then
%>

<td align=\"center\">没有参数~~ </td>
<%
else
&#39;猎取三级分类
set rs=server.createobject(\"adodb.recordset\")
rs.open \"select * from product_class where id=\"&lb&\" order by nm desc\",conn,3,2
if rs(\"c3\")=true then
class3=rs(\"labe_cs\")
c0=rs(\"c0\")
end if
rs.close
&#39;猎取二级分类
if c0<>\"\" then
rs.open \"select * from product_class where id=\"&c0&\" order by nm desc\",conn,3,2
if rs(\"c2\")=true then
class2=rs(\"labe_cs\")
c0=rs(\"c0\")
end if
rs.close
end if
&#39;猎取一级分类
if c0<>\"\" then
rs.open \"select * from product_class where id=\"&c0&\" order by nm desc\",conn,3,2
if rs(\"c1\")=true then
class1=rs(\"labe_cs\")
end if
rs.close
end if
rs.open \"select * from works where class1=\"&lb&\" order by id\",conn,3,2
%>
<div class=\"labe\">产品 》 <a href=\"lista.asp?lb=<%=lb%>\"></a><%= class1 %> 》 <%= class2 %> 》 <%= class3 %></div>
<%if rs.eof then%>
<td align=\"center\">没有查找到您想要的产品~~</td>
<%
else
rs.pagesize=12
if request(\"page\")=\"\" or request(\"page\")=\"1\" then
page=1
else
page=request(\"page\")
end if
rs.absolutepage=page
rowcount=rs.pagesize
allcount=rs.recordcount
%>
<div class=\"labx\">产品列表</div>
<%
do while not rs.eof and rowcount>0
g=rs(\"upic\")
%>
<div class=\"box\" style=\"height:130px; width:102px; float:left;\">
<div style=\"width:102px; border:3px solid #eee; height:102px; clear:none;\">
<div style=\"border:1px solid #ccc; width:100px; height:100px; overflow:hidden; text-align:center;\" onMouseOver=\"this.style.border=&#39;1px solid #7af&#39;\" onMouseOut=\"this.style.border=&#39;1px solid #ccc&#39;\">
<a href=\"../goods/goods_<%= rs(\"id\") %>.htm\">
<%if g=\"\" then%>
<img src=\"../zzone/skin/icon_info.gif\" alt=\"<%=rs(\"labe\")%>\" width=\"80\" height=\"80\" border=\"0\" />
<%else%>
<img src=\"<%if left(g,5)=\"http:\" then%><%=g%><% Else %>../uppic/<%=left(g,6)%>/<%=g%><% End If %>\" alt=\"<%=rs(\"labe\")%>\" width=\"100\" border=\"0\" onload=\"if(this.height>100){this.width=10000/this.height; this.height=&#39;100&#39;}else{this.style.margin=(100-this.height)/2+&#39;px 0px&#39;};\" />
<%end if%>
</a></div>
</div>
<div align=\"center\">
<div>
<div style=\"line-height:17px; border:0px solid #ddd; padding:5px;\">
strong><%= rs(\"numb\") %></strong></div>
</div>
</div>
</div>
<%
rowcount=rowcount-1
rs.movenext
loop
%>
<div class=\"div_pnm\" style=\"clear:both;\">
<%if page>1 then%><a href=\"../<%=rs1(\"id\")%>_<%=rs1(\"labe_cs\")%>类目_第<%= page-1 %>页.htm\">上一页</a><%end if%> 共<%= allcount %>件产品 当前第<%= page %>页/共<%= rs.pagecount %>页 <%if rs.pagecount>page*1 then%><a href=\"../<%=rs1(\"id\")%>_<%=rs1(\"labe_cs\")%>类目_第<%= page+1 %>页.htm\">下一页</a> <a href=\"../<%=rs1(\"id\")%>_<%=rs1(\"labe_cs\")%>类目_第<%= rs.pagecount %>页.htm\">最后一页</a><%end if%>
</div>
<% rs.close
end if
end if%>
您需要登录后才可以回帖 登录 | 成为会员

本版积分规则

QQ|手机版|小黑屋|网站帮助|职业IT人-IT人生活圈 ( 粤ICP备12053935号-1 )|网站地图
本站文章版权归原发布者及原出处所有。内容为作者个人观点,并不代表本站赞同其观点和对其真实性负责,本站只提供参考并不构成任何投资及应用建议。本站是信息平台,网站上部分文章为转载,并不用于任何商业目的,我们已经尽可能的对作者和来源进行了通告,但是能力有限或疏忽造成漏登,请及时联系我们,我们将根据著作权人的要求立即更正或者删除有关内容。

GMT+8, 2024-4-28 21:15 , Processed in 0.140697 second(s), 20 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表