ASP数据库显示前十条的问题

<%
t=0
Set rs=Server.CreateObject("ADODB.RecordSet")
sql="SELECT * from NEWS order by id desc"
rs.Open sql,conn,1,1
if not Rs.eof then
do while not rs.eof
t=t+1
%>

最简单的方法就是在Select语句里面处理，如下程序：
<%
dim rs1,rs2
Set rs1=Server.CreateObject("ADODB.RecordSet")
sql="SELECT TOP 10 * from article where classid=1 order by id desc"
rs1.Open sql,conn,1,1
do while not rs1.eof
'在这里写显示的代码
rs1.MoveNext
loop

Set rs2=Server.CreateObject("ADODB.RecordSet")
sql="SELECT TOP 10 * from article where classid=2 order by id desc"
rs2.Open sql,conn,1,1
do while not rs2.eof
'在这里写显示的代码
rs2.MoveNext
loop
%>

前十条select top 10 * from article where classid=1 order by 字段名 asc
后十条select top 10 * from article where classid=1 order by 字段名 desc

select top 10 * from article where classid=1 [order by 字段名 asc或desc]

前十条 order by 字段名 asc
后十条 desc