Frazionare numeri pagina

[Federix]

Se io ho 200 pagine, non vorrei vedere 200 link nella solita pagina, ma vorrei vedere i primi 10 link, poi quando arrivo al decimo, vedere i successivi 10, quando sono al ventesimo i successivi dieci, e cosi via.
Qualcuno sa per caso come fare per frazionare i numeri pagina?? Un pò come avviene con le ricerca di Google, che mostra solamente i numeri di 10 pagine alla volta.

[Roby_72]

Si chiama paginazione.
Prova a cercare nel forum.

Roby

[Federix]

La paginazione la sapevo fare, però mi scriveva tutti i numeri di pagina in fila, io volevo frazionare e avere solamente una decina di pagina e avanzare di 10 in 10, comunque forse ci sono riuscito da solo.
Grazie comunque

[santino83]

function stampaPagine(totale,attuale)
dim max,lstart,tstart,txt,nxt,bxt,temp
max=5 'numero di pagine visualizzabile

if totale<= max then
lstart=1
tstart=totale
else
temp=cstr(attuale/max)
temp=split(temp,",")
mtp=cint(temp(0))
lstart=max*(mtp)
tstart=lstart+max
end if

if attuale>1 then
bxt=attuale-1
txt=txt & "&lt;&lt;"
txt=txt & " &lt; "
end if

if lstart=0 then lstart=1
if tstart>totale then tstart=totale
for i=lstart to tstart
if i>lstart then txt=txt & " - "
if i=attuale then
txt=txt & i
else
txt=txt & " " & i & ""
end if
next

nxt=attuale+1
if nxt>totale then nxt=totale
if nxt>=lstart and totale>1 and nxt<totale then txt=txt & " &gt;"
if totale>1 and totale>nxt then txt=txt & " &gt;&gt;" 
stampaPagine=txt
end function


pagine_totali=200
attuale=1
response.write stampaPagine(pagine_totali,attuale)

cambia solo i link che trovi nei vari href