这是为什么呢？请帮我好吗？

[zigine]

ADODB.Field (0x800A0BCD)
BOF 或 EOF 中有一个是“真”，或者当前的记录已被删除，所需的操作要求一个当前的记录。
/alaud/mini/forum.asp, 第 176 行


<%
strsqlclass="select class_id,class_name from bbs_class order by class_order"
set rsclass=conn.execute(strsqlclass)
do while not rsclass.eof
classid=rsclass("class_id")
response.write vbcrlf & forum_table1 & "<tr><td height=20"&format_bb(bg_color)&" colspan=4> <img src=images/jiantou.gif border=0> " & vbcrlf & "<font class=end><b>" & rsclass("class_name") & "</b></font></td></tr>"

strsqlforum="select forum_id,forum_name,forum_type,forum_new_info,forum_topic_num,forum_data_num,forum_power,forum_remark,forum_pic " & _
"from bbs_forum where class_id=" & classid & " and forum_hidden=0 order by forum_order,forum_id desc"
set rsforum=conn.execute(strsqlforum)
<!-----------------最后回复---------------------------->

do while not rsforum.eof

forumid=rsforum("forum_id"):forumname=rsforum("forum_name")
forum_type=rsforum("forum_type")
forum_new_info=rsforum("forum_new_info")
new_info_dim=split(forum_new_info,"|")
sql="select re_username from bbs_topic where username='"&new_info_dim(0)&"' order by id desc"
set rs=conn.execute(sql)
re_username=rs("re_username")说这一行错第 176 行
forum_pic=rs("forum_pic")
response.write forum_view()
rsforum.movenext
rs.movenext
loop
rsclass.movenext
response.write "</table>" & kong
loop
set rsclass=nothing:set rsforum=nothing

response.write kong & forum_table1


%>

[wsj]

sql="select re_username, forum_pic from bbs_topic where username='"&new_info_dim(0)&"' order by id desc"

[listen]

有问题吧？
在循环里为什么不set rs = nothing呢？
还有：
从rs里取记录的时候为什么不先
If rs.eof or rs.bof Then
'处理
Else
'其它处理
End If

[cpio]

就是说没有选出记录来

[zigine]

详细说说，不明白

[zigine]

我按wsj (骆驼)(从麻木中苏醒) 的改了，还是不行！参数不足它说！

[fenlin]

SQL 语句错了。已在另一个帖子里说过了。

[zigine]

可我改了，还是不行！