一个百思不得其解的错误。第279行 rs.close 的时候就会出错，我明明创建了对象，硬说我没有。。。
程序代码：
<table border="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber3">
<tr>
<td width="100%" height="25"><b><font color="#000080" size="3">二、多项选择题(每题<%=multiper%>分,共<%=multicount%>题。每题至少有2项正确的答案，少选每答对一题得<%=multiper/4%>分，多选不得分)</font></b></td>
</tr>
</table>
<%
for i=singlecount to multicount+singlecount-1
sql="select * from exam_database where ID="&subject_id(i)
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,3,2
if not rs.eof then
%>
<table border="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber2">
<tr>
<td width="100%" bgcolor="#EFEFEF" height="20"> <b><%=i+1%>、<%=rs("question")%></b></td>
</tr>
<%
if trim(rs("text1"))<>"" then
%>
<tr>
<td width="100%"> <input type="checkbox" name="NO<%=rs("id")%>" value="A">A、<%=rs("text1")%></td>
</tr>
<%
end if
%>
<%
if trim(rs("text2"))<>"" then
%>
<tr>
<td width="100%"> <input type="checkbox" name="NO<%=rs("id")%>" value="B">B、<%=rs("text2")%></td>
</tr>
<%
end if
%> <%
if trim(rs("text3"))<>"" then
%>
<tr>
<td width="100%"> <input type="checkbox" name="NO<%=rs("id")%>" value="C">C、<%=rs("text3")%></td>
</tr>
<%
end if
%> <%
if trim(rs("text4"))<>"" then
%>
<tr>
<td width="100%"> <input type="checkbox" name="NO<%=rs("id")%>" value="D">D、<%=rs("text4")%></td>
</tr>
<%
end if
%> <%
if trim(rs("text5"))<>"" then
%>
<tr>
<td width="100%"> <input type="checkbox" name="NO<%=rs("id")%>" value="E">E、<%=rs("text5")%></td>
</tr>
<%
end if
%> <%
if trim(rs("text6"))<>"" then
%>
<tr>
<td width="100%"> <input type="checkbox" name="NO<%=rs("id")%>" value="F">F、<%=rs("text6")%></td>
</tr>
<%
end if
%>
</table>
<%
end if
next
rs.close
set rs=nothing
%>
