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

Companies List Floor & Unit Number Company Name <% 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("enname")%>