Se muestran X registros por página (tamanopagina)
Código:
Proximamente miraré para añadir ir una página especifica.' Imprime en pantalla: Página 1 de 5 ' se le pasa el valor de first record index, total records y tamanopagina ' tamaño pagina = numero de registros a mostrar ' Code by portalurbano.com xD function PaginaTotal(inicio,totalR,tamanopagina) Dim total,actual total = FormatNumber((totalR/tamanopagina), 0, -2, -2, -2) if total/tamanopagina > total then total = total + 1 end if actual = FormatNumber((total/totalR)*inicio, 0, -2, -2, -2) if actual <> total then actual = actual +1 end if Response.write "Página "&actual de "&total&"..." End Function '--------------------------------------------------------
Lo q quiero saber es si se puede mejorar, ad+ de usar menos variables
