Question

错误类型： ADODB.Recordset (0x800A0E78) 对象关闭时，不允许操作。 /co/co1/production.asp, 第 49 行

<table width="760" height="400" border="0" cellspacing="0" cellpadding="0" bgcolor="#FFFFFF" align="center" style="border-right:1px #666666 solid;border-left:1px #666666 solid">
<tr>
<td width="180" bgcolor="#efefef" style="border-right:1px #cccccc solid" valign=top>
<!--===================-->
<!--#include file="left.asp"-->
<!--===================-->
</td>
<td width="578" valign="top">
<!--===================-->
<table width="550" border="0" cellspacing="0" cellpadding="0" align="center">
<tr><td> </td></tr>
<tr><td height=31 background="img/title_1.gif"><strong>产品展示</strong></td></tr>

<tr><td valign=top><%=cocp%></td></tr>
<tr><td>
<%set rs=server.createobject("adodb.recordset")
'set rs1=server.createobject("adodb.recordset")
sql="select * from SMT_cp where SMT_yp_id="&id&" order by SMT_date desc "
rs.open sql,conn,1,1
do while not rs.eof

coname=rs("SMT_cpname")
coid=rs("SMT_id")
cojm=rs("SMT_cpjm")

response.Write("@  "&Trim(code_jk(rs("SMT_cpjm"))))
%>
<%
rs.movenext
loop
%>
<%
rs.close
set rs=nothing
%>
<%
%>
<%set rs=server.createobject("adodb.recordset")
set rs1=server.createobject("adodb.recordset")
sql="select * from SMT_yp where SMT_key<>0 and SMT_key<>2 and SMT_key<>4 and SMT_key1=1 and SMT_id="&id
rs.open sql,conn,1,1
if rs.bof and rs.eof then

goname=rs("SMT_user")
goid=rs("SMT_id")
govip=rs("SMT_vip")
end if%> 49行
<%response.Write("<img src=../../"&rs("SMT_logo")&" height=90 width=162>")%>

<%rs1.close
set rs1=nothing
%>
</td></tr>
</table>
<!--===================-->
</td>
</tr>
</table>

请问哪错了，我只是想获取那个logo图片

Answer 1

1. 你的rs1并没有开任何表，所以不需要在最后做关闭
2. 而你第二部分在If循环处条件是EOF情况，意味着只有表空的时候才操作，这个估计是写反了，想用 Not rs.EOF
3. 在IF之外，你仍然在调用rs("SMT_logo")，如果IF条件为的是判断表不为空，那么这里会出现EOF错误
4. 最后的rs1关闭，估计你是想写rs关闭

一下改过的代码，你看看是不是你要的：
<table width="760" height="400" border="0" cellspacing="0" cellpadding="0" bgcolor="#FFFFFF" align="center" style="border-right:1px #666666 solid;border-left:1px #666666 solid">
<tr>
<td width="180" bgcolor="#efefef" style="border-right:1px #cccccc solid" valign=top>
<!--===================-->
<!--#include file="left.asp"-->
<!--===================-->
</td>
<td width="578" valign="top">
<!--===================-->
<table width="550" border="0" cellspacing="0" cellpadding="0" align="center">
<tr><td> </td></tr>
<tr><td height=31 background="img/title_1.gif"><strong>产品展示</strong></td></tr>

<tr><td valign=top><%=cocp%></td></tr>
<tr><td>
<%set rs=server.createobject("adodb.recordset")
'set rs1=server.createobject("adodb.recordset")
sql="select * from SMT_cp where SMT_yp_id="&id&" order by SMT_date desc "
rs.open sql,conn,1,1
do while not rs.eof
coname=rs("SMT_cpname")
coid=rs("SMT_id")
cojm=rs("SMT_cpjm")

response.Write("@ "&Trim(code_jk(rs("SMT_cpjm"))))
rs.movenext
loop
rs.close
set rs=nothing
%>

<%
set rs=server.createobject("adodb.recordset")
'set rs1=server.createobject("adodb.recordset")
sql="select * from SMT_yp where SMT_key<>0 and SMT_key<>2 and SMT_key<>4 and SMT_key1=1 and SMT_id="&id
rs.open sql,conn,1,1
if Not rs.eof then
goname=rs("SMT_user")
goid=rs("SMT_id")
govip=rs("SMT_vip")
response.Write("<img src=../../"&rs("SMT_logo")&" height=90 width=162>")
end if
rs.close
set rs=nothing
%>
</td></tr>
</table>
<!--===================-->
</td>
</tr>
</table>

Answer 2

if rs.bof and rs.eof then 错误 了
应该是：
if not rs.eof then