Kode til Database

Hej eksperter
Denne lille stump kode henter de 5 sidste billede fra min database  (Access ) Nu er det sådan at jeg har 100 billeder i min base, og gerne vil have de 5 sidste på side nr 1, og de nest neste 5 sidste på side nr 2 osv.

Sådan ser koden ud:
<%
ConnectString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("Database.mdb")
Set conn = Server.CreateObject("ADODB.Connection")
conn.open ConnectString
%>                                <%
  sql = "SELECT TOP 5 * FROM Users WHERE username Like '" & sex & "%' ORDER BY ID DESC"
  Set rsUser = Server.CreateObject("ADODB.Recordset")
  rsUser.Open sql, conn, 3, 3
 
 
  sql = "SELECT username FROM users"
  Set rsusername = Server.CreateObject("ADODB.Recordset")
  rsusername.Open sql, conn, 3, 3
usercount = 0
  if not rsusername.EOF then
    rsusername.Movefirst
    do until rsusername.EOF
       
            usercount = usercount + 1
   
        rsusername.Movenext
    loop
    rsusername.Movefirst
  end if
%>


er der nogen der kan hjælpe mig med det.
mvh
Asiapigen