关于“类型不匹配: 'rs'”的错误！！！

[fujunle]

=====================================================
<%
Set rs=Server.CreateObject("Adodb.RecordSet")
sql="select * from lpbj where user_id=270 order by date desc"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write "暂无内容"
end if
%>
<TABLE width="98%" height="25" border=0 cellPadding=0 style="border-collapse: collapse; margin-top:5">
<tr>
<td height="25" align="center" bgcolor="#800000">
<font color="#FFFFFF">楼盘名称</font></td>
<td height="25" align="center" bgcolor="#800000">
<font color="#FFFFFF">楼盘类型</font></td>
<td height="25" align="center" bgcolor="#800000">
<font color="#FFFFFF">售楼热线</font></td>
<td height="25" align="center" bgcolor="#800000">
<font color="#FFFFFF">元/米²（起价）</font></td>
<td height="25" align="center" bgcolor="#800000">
<font color="#FFFFFF">发布日期</font></td>
</tr>
(30行错误) <%do while not rs.eof%>
<tr>
<td height="25" align="left">
　<%=rs("lpname")%></td>
<td height="25" align="left">
　<%=rs("lplx")%></td>
<td height="25" align="left">
　<%=rs("tel")%></td>
<td height="25" align="left">
　<%=rs("jiage")%></td>
<td height="25" align="left">
　<%=rs("date")%></td>
</tr>
<%
rs.movenext
rs.close
set rs=nothing
loop
%>
</table>
=====================================================
类型不匹配: 'rs'，错误30行

[我是丁学]

rs.movenext
rs.close
set rs=nothing
loop
=============================
这几行错了，把loop写到rs.close上面
你这样写，在第一次循环就把rs=nothing了，第二次循环当然会出错
要这样：
rs.movenext
loop
rs.close
set rs=nothing

[stou]

樓上正解.

[ljmljz]

dxef正解

[chinabh]

来晚了,呵呵

[飘零雾雨]

rs.movenext
loop
rs.close
set rs=nothing

[chinastorm]

loop的原因
大家都很快么，楼主结贴了！

[q2000000]

哈，前天我也是这样的问题，后来看了半天不知道错在哪。最后一个CLOSS就搞定了，，，，，，
UP一下

[yowbell]

开眼界，学习！

[gui0605]

这错..

[vvvice]

晚来了。