<%
set rs = Baglan.Execute("select TOP 10 id,aranan from ARANANLAR order by id DESC")

For p = 1 To 10
if rs.eof Then exit For
aranan = rs("aranan")
%>
<a href="Sonucgoster.asp?ara=<%=aranan%>"><%=aranan%> </a>,
<%
rs.Movenext
Next
rs.Close
Set rs = Nothing
%>