招行agnes b包是真的嘛:求救:ASP 缺少对象: '' 咋整!各位大虾帮帮忙!
来源:百度文库 编辑:杭州交通信息网 时间:2024/09/21 09:25:05
Microsoft VBScript 运行时错误 错误 '800a01a8'
缺少对象: ''
/view.asp,行 253
253行:<%do while not r6.eof%>
代码:
<%
Submit=request.form("Submit")
if Submit<>"" then
nicheng=request.form("nicheng")
neirong=request.form("neirong")
set r6=server.createobject("adodb.recordset")
s6="Select * from pinglun "
r6.open s6,conn,1,3
r6.addnew
r6("nicheng")=nicheng
r6("neirong")=neirong
r6.update
r6.close
set r6=nothing
conn.close
set conn=nothing
end if
%>
<%do while not r6.eof%>
<table width="100%" border="0" cellspacing="0">
<tr bgcolor="#E1F4EE">
<td colspan="3" class="style6">网友[<%=r6("nicheng")%>]认为 参评时间:<%=r6("date")%></td>
</tr>
<tr>
<td width="6%" bgcolor="#FFFFCC"> </td>
<td width="88%" bgcolor="#FFF9DD"><%=r6("neirong")%></td>
<td width="6%" bgcolor="#FFF9DD"> </td>
</tr>
<tr>
<td width="6%"></td>
<td width="88%"></td>
<td width="6%"><h5></h5></td>
</tr>
</table>
<%
r6.movenext
loop
%>
把<%
Submit=request.form("Submit")
if Submit<>"" then
nicheng=request.form("nicheng")
neirong=request.form("neirong")
set r6=server.createobject("adodb.recordset")
s6="Select * from pinglun "
r6.open s6,conn,1,3
r6.addnew
r6("nicheng")=nicheng
r6("neirong")=neirong
r6.update
r6.close
set r6=nothing
conn.close
set conn=nothing
end if
%>
改成
<%
set r6=server.createobject("adodb.recordset")
s6="Select * from pinglun "
Submit=request.form("Submit")
if Submit<>"" then
nicheng=request.form("nicheng")
neirong=request.form("neirong")
r6.open s6,conn,1,3
r6.addnew
r6("nicheng")=nicheng
r6("neirong")=neirong
r6.update
r6.close
end if
r6.open s6,conn,1,1
%>
前面有这么几句:
r6.close
set r6=nothing
conn.close
set conn=nothing
end if
,这些内容把rs6关闭并清空了,所以你再do while not r6.eof的时候r6这个对象就不寻在了。可以把前面那几句去掉,或者重新查询一次。
r6.close
set r6=nothing
conn.close
set conn=nothing
以上代码导致的
r6这个对象已经不存在了
r6.close
set r6=nothing
conn.close
set conn=nothing
end if
你上边这句已经关闭了r6记录集,
后边怎么用<%do while not r6.eof%>?
里边的r6已经close了,并且已经nothing了
把r6.close
set r6=nothing
conn.close
set conn=nothing
放在最后即可解决错误
这是因为缺少conn对象或者rs对象,按我说的两种测试一下,一定可以搞定
一,检查你是不是已经打开了conn对象。比如说include 了conn.asp等文件
或者,你再第一次操作数据时是不是关闭了conn对象
二。是不是你第二次用rs对象进行读取数据时,忘了先打开rs对象