access de sql ile limit vermek istiyorum

<%
	  Set kon = CreateObject("ADODB.Connection")
Set rs = server. CreateObject("ADODB.Recordset")
kon.Open ("DRIVER={Microsoft Access Driver (*.mdb)};DBQ="& Server.MapPath("XXX.mdb"))
sql="select * from tabloadı where order by hit desc"
rs.Open sql, kon, 1, 3
sayfaadet = rs.recordcount
list = 4 // burada kaç defa döngüye gireceğini yazıyorsun ayrıca kaç kayıtı göstermek istiyorsan o rakam olacak
if request("sayfa")<>"" then
sayfa = cdbl(request("sayfa"))
rs.move sayfa*list
else
sayfa = 0
end if
for t=1 to list
if rs.eof then exit for
%>

Burada Artık Tablo veya ne koyarsan orası belirttiğin kadar döngüye girecek olan bölüm.

<% rs.movenext
				  
			next 
			%>
<font size="2"> <font size="1" face="Verdana, Arial, Helvetica, sans-serif">Sayfa 
            No :</font> 
            <%
if sayfaadet/list = int(sayfaadet/list) then sayfaadet = sayfaadet/list else sayfaadet = int(sayfaadet/list) +1
for p=0 to sayfaadet-1
if sayfa = p then
%>
            </font> <font color="#999999" size="1" face="Verdana, Arial, Helvetica, sans-serif"><strong><%=p+1%> 
            <% else %>
            </strong></font><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><strong><A href="online.asp?sayfa=<%=p%>" style="text-decoration: none"><%=p+1%></A></strong></font> 
            <%
end if
next
%>