怎样这控制信息输出的条数？

要想输出数据库中的信息并控制该信息的条数要怎么做？
---------------------------------------------------------------

Set Rs = Server.CreateObject("ADODB.Recordset")
Rs.Open "Select * From C_Class Order By To_Number(ClassID)",Conn,1,1
I = 0
Do While Not Rs.EOF
Response.Write "

1<a ""="" ;parent.main.location.href='News.asp?ClassID="&amp; Rs("ClassID") &amp;"' cursor:hand""="" javascript:parent.left.location.href='Class.asp?ClassID="&amp; Rs("ClassID") &amp;"&amp;ClassName="&amp; Rs("ClassName") &amp;_   
2"' left""="" onclick="" style="" target=""><b>"&amp; Rs("ClassName") &amp;"</b></a>

"
Rs.MoveNext
I = I + 1
IF I = 6 THEN EXIT DO'这里显示指定的条数后就跳出
Loop
Rs.Close
---------------------------------------------------------------

sql="select top 10 * from C_Class"(选定10条）
Set Rs = Server.CreateObject("ADODB.Recordset")
Rs.Open sql,Conn,1,1
for I = 1 to 10（选定10条）
...
rs.MoveNext
next