Question

ACCESS判断记录集是否为空

huanzhuang=server.HTMLEncode(trim(request("huanzhuang"))) sql="select * from findhuanzhuang where wpname='"&huanzhuang&"' order by wpjibie asc" rs.open sql,conn for i=1 to 20 if not rs.eof then %> <tr> <td height="25" align="center" bgcolor="#B5F0FF"><%=rs("wpname")%></td> <td align="center" bgcolor="#B5F0FF"><%=rs("wpleixing")%></td> <td align="center" bgcolor="#B5F0FF"><%=rs("wpjibie")%></td> <td align="center" bgcolor="#B5F0FF"><%=r("zhanghao")%></td> <td align="center" bgcolor="#B5F0FF"><%=rs("time")%></td> <td align="center" bgcolor="#B5F0FF"><%=rs("wpshuxing")%></td> <td align="center" bgcolor="#B5F0FF"><input name="del" type="checkbox" id="del" value="<%=rs("id")%>" /></td> </tr> <% rs.movenext else end if next %> 请帮我看看我这句语句有什么问题，能否改进？ 我的想法是if not rs.eof then，如果不是空记录集就打印数据。 但是我想加个判断，如果不是空就打印，是空就提示没有数据。 可是吧for循环放到if里面就报错，不知道该怎么做。 ASP+ACCESS

Answer 1

<% huanzhuang=server.HTMLEncode(trim(request("huanzhuang"))) sql="select * from findhuanzhuang where wpname='"&huanzhuang&"' order by wpjibie asc" rs.open sql,conn if not rs.eof then for i=1 to 20 %> <% rs.movenext else %> 数据为空！ <% end if next %>

Answer 2

用do while ... loop 语句 <% SQL.... if not rs.eof then do while not rs.eof %> 打印记录 <% rs.movenext loop else %> 数据为空！ <% end if %>