<%option explicit%> <% dim ceng ceng=request("ceng") dim rs dim sql set rs=server.createobject("adodb.recordset") sql="select * from guang where ceng='"+ceng+"' order by id desc" rs.open sql,conn,1,1 %>

<%=rs("ceng")%>楼所有商户 楼层单元 公司名称 <% dim f f=1 do while not rs.eof%>> <%f=f+1 rs.movenext if f>200 then exit do end if loop %> <%=rs("cell")%> "><%=rs("chname")%>