Question

asp 对象关闭时 不允许操作 。行 73 求教大神，如何解决？

<%
dim db,keyword
keyword=trim(request.QueryString("keyword")&"")
if keyword<>"" then keyword=" and gq_article.title like '%" & keyword & "%'"
set db=dblink()
if request("classid")<>"" then
sql="select gq_article.* from gq_relation left JOIN gq_article ON gq_relation.r_id=gq_article.id where gq_relation.d_id="&request("classid")&" and gq_article.is_del=0 "& keyword &" order by gq_article.listorder asc,gq_article.id desc"
else
sql="select * from gq_article where is_del=0 "& keyword &" order by listorder asc,id desc"
end if
db.pagesize=20
db.execute(sql)
while db.read() ----------------------------------------------------行73
%>
<tbody>
<tr>
<td width="40"><input type="checkbox" name="checkbox" value="<%=db.field("id")%>" /></td>
<td ><%=db.field("title")%></td>
<td width="200"><%=DirectoryName(db.field("class_id"))%></td>
<td width="150"><%
if not isnull(db.field("news_date")) and db.field("news_date")<>"" then
response.Write(db.field("news_date"))
else
response.Write(db.field("in_time"))
end if%></td>
<td width="80"><a href="news.hb?id=<%=db.field("id")%>&selflink=<%=comm.codeoldpath()%>">修改</a> | <a href="news_data.hb?act=Del&id=<%=db.field("id")%>&selflink=<%=comm.codeoldpath()%>" onclick="return ConfirmDel('确定要删除?')">删除</a></td>
</tr>
<%
wend
%>

Answer 1

你没有打开记录集哦、、你没有打开记录集对象、、你让他显示什么哦、、数据库没有打开

Answer 2

你这里没有打开数据库的连接，你需要定义打开连接

Answer 3

数据库没有打开

追问

哪里看出来的？