% set rs=server.createobject("adodb.recordset") sql="select * from ProClass" rs.open sql,Conn,1,1 if not(rs.eof and rs.bof) then do while not rs.eof %>