Paging con interrogazione su DB

[acer1629]

Ciao ragazzi
qualcuno mi sa dire un modo "semplice" per fare paging di 200 record su una query fatta su un Db ?

Il mio Resultset è il seguente :

Set Con=Server.CreateObject("ADODB.Connection") 
Con.Open "Provider=msdaora;Data Source=XXXXXX;User Id=XXXXXXX;Password=XXXXXXXXX;" 

query="select * FROM XXXXX"

rs.Open query
while not rs.eof

<<< COMPOSIZIONE PAGINA IN HTML >>>

rs.movenext
Wend	
rs.close
set rs=nothing

Grazie.