con questo script conto sia le cartelle che le foto nelle subcartelle.
Esempio:
utente A a tre cartelle che contegono ogniuna 2 foto.
Il mio problema e visualizzare 5 cartelle per pagina qualora vi siano per un utente 10 cartelle.
<%
page = Request("page")
if len(page) > 0 and isNumeric(page) then
page =clng(page)
else
page =1
end if
filesPerPage=2

Set FileObject = Server.CreateObject("Scripting.FileSystemObject")
strPath = server.mappath("../public/foto/"&user)
Set f = FileObject.getfolder(strPath)
set fc = f.subfolders
contafolder=0
For Each f1 in fc

contafolder = (contafolder+1)
response.write (""&f1.name&"")
response.write ("
")
strFile = server.mappath("../public/foto/"&user&"/"&f1.name)
Set fileget = FileObject.getfolder(strFile)
set getfile = fileget.files
conta= 0
For Each file in getfile
conta = (conta+1)

Next

response.write (" Nella cartelle ci sono : "&conta&" foto ")
response.write ("<hr>")
Next

response.write ("

<center>Viaggi per quasto socio : "&contafolder&"</center></p>")
Pagine = contafolder / filesPerPage

If pagine > 0 then
Response.Write("<center>Pagine:")
For p=1 to pagine

If p <> CInt(Page) then
Response.Write("<A target='_self' href='link.asp?page=" & p)
Response.write("'>")
Else
' pagina attuale
Response.Write ("")
End if
Response.Write p
If p <> CInt(Page) then
Response.Write (" </A> ")
Else
Response.Write (" ")
End if
Next
End if

Set getfile = Nothing
Set fileget = Nothing
Set fc = Nothing
Set f = Nothing
%>
questo e il codice che sto utilizzando ma non limita i record per pagina attendo vosri consigli.
ciao
P.S. ho provato a ricercare nel forum ma non trovato nulla che faccia a mio caso