set rs=server.createobject("adodb.recordset") sql= "select * from admin order by sj asc " rs.open sql,conn,1,1'for i=1 to 5while not rs.eof a=a+1 %>