Paging of access database using asp and vb script. Please help ASAP?

[$ H A U /\/]

Hey there!
I have a 1000 records access database and I want to display only 20 per page!
And I want to add links like <prev and next> to display other pages can anyone help me please with the code ?
My code looks like this
<%
dim cn,rs,i, j
i=0
j=20
set cn=server.createobject("ADODB.connection")
set rs=server.createobject("ADODB.recordset")
cn.open"list"
rs.open"Engineer",cn,2,3,adcmdtable
rs.movefirst
%>
<table border="1" cellspacing="0">
<%
do while not rs.eof
i=i+1
response.write "<tr>"
response.write "<th>" & rs.fields(0) & "</th>"
response.write "<th>" & rs.fields(1) & "</th>"
response.write "<th>" & rs.fields(2) & "</th>"
response.write "</tr>"
rs.movenext
if i=j then
response.End
end if
loop
%>