<%
strsql = "SELECT * FROM tabloismi order by gelen_no desc/asc limit 10"
set rs = Server.CreateObject("ADODB.Recordset")
rs.Open strsql, conn, 1, 2

Do while not rs.eof

%>
Veriyi döngüye sokacağın alan...
<%
rs.movenext
loop
rs.close
%>