输出的部分代码如下：
<% if rs.eof and rs.bof then
response.write "暂时没有留言！"
else
for r=1 to rs.pagesize%>
<tr>
<td width="15%" align="left" class="text">姓名： </td>
<td bgcolor="#CCFFCC" class="text"> <%=rs("name") %> </td>
<td width="15%" align="left" class="text">主题： </td>
<td bgcolor="#CCFFCC" class="text"> <%=rs("zhuti")%></td>
</tr><tr>
<td width="15%" align="left" class="text">单位： </td>
<td bgcolor="#CCFFCC" class="text"> <%=rs("danwei") %></td>
<td width="15%" align="left" class="text">电话： </td>
<td bgcolor="#CCFFCC" class="text"> <%=rs("tel") %></td>
</tr><tr>
<td width="15%" align="left" class="text">Email: </td>
<td bgcolor="#CCFFCC" class="text"> <%=rs("email") %></td>
<td width="15%" align="left" class="text">时间： </td>
<td bgcolor="#CCFFCC" class="text"> <%=rs("lysj")%></td>
</tr><tr class="text">
<td width="15%" align="left">内容： </td>
<td colspan="3" align="left" bgcolor="#CCFFCC"> <%=rs("content")%></td>
</tr>
<tr class="text">
<td colspan="4" align="left" bgcolor="#FFFFFF">
<%if rs("huifu")<>"" then response.write rs("huifu")
else response.write "对不起，没有回复！"
end if%>
</td>
</tr>
<%rs.movenext
if rs.eof then
exit for
end if
next
end if%>

总是会出现以下错误：
错误类型：
Microsoft VBScript 编译器错误 (0x800A03FC)
缺少 'Next'
/asp_qiye/lyxs.asp, line 135
else response.write "对不起，没有回复！"

请问代码中粗体字有什么错误呢？
谢谢！