fai così :
codice:
' serve per calcolare l'inizio e la fine della paginazione
if pagina - 2 > 0 then
   inizio = pagina + 2
elseif pagina - 1 > 0 then
   inizio = pagina - 1
else
   inizio = pagina
end if
							
if pagina + 2 <= pagine_totali then
   fine = pagina + 2
elseif pagina + 1 <= pagine_totali then
   fine = pagina + 1
else
   fine = pagina
end if
if inizio = 1 and inizio + 4 <= pagine_totali then
   fine = inizio + 4
end if
if fine - 4 > 0 then
   inizio = fine - 4
end if
if pagine_totali <= 5 then
   inizio = 1
   fine = pagine_totali
end if
' io l'avevo fatto così per visualizzare in totale 5 pagine per volta...

naturalmente nel for per visualizzare i numeri devi sostituire le variabili inizio e fine

for i = inizio to fine