Paging när man använder Fso

Jag har denna kod:[kod]<%
set fso = Server.CreateObject("Scripting.FileSystemObject")
set folder = fso.getFolder(server.mappath("ARKIV/"))

If NOT fso.FolderExists(server.mappath("ARKIV/")) Then
Response.Write "Folder is missing!"
Else

set files = folder.files

for each Item in files
response.write "<a href ='/bilder.asp?showIMG=/ARKIV/"& Item.name &"'>"& Item.name &"</a> "
Next
End if
set folder = nothing
set fso = nothing
set files =nothing
%>
Men jag vill skapa en paging, så om det finns fler än säg 10 filer i mappen så får man gå till nästa sida... hur skall jag göra? :q