Recientemente, el sitio web fue revisado y descubrió que la página original no contenía números, solo la página de inicio, la última página, la página siguiente y el salto selecto antes, pero ahora la más popular es que la página de números está en el medio, que solo se investiga y comparten. Los amigos que lo necesitan pueden referirse a él.
Efecto:
Código central extranjero:
La copia del código es la siguiente:
<%
'Script de paginación de estilo Digg en ASP .. Escrito por Moazam ... http://www.moazam.com/2007/03/30/asp-digg-style-pagation-script/
Función GetPaginationString (página, TotalItems, límite, adyacentes, TargetPage)
'Valores predeterminados
Si no es isnumérico (adyacentes), entonces adyacentes = 1 extremo si
Si no es isnumérico (límite), luego limite = 15 finalizar si
Si no es isnumérico (página), entonces página = 1 finalizar si
if targetPage = "" entonces TargetPage = "/" end si
margen = ""
Padding = ""
'Otros vars
PREV = Página - 1''Previous Page es página - 1
nextPage = página + 1'NextPage La página es página + 1
lastPage = tEil (totalitems, límite) 'LastPage es = Total de elementos / elementos por página, redondeados.
LPM1 = LastPage - 1'Last Página menos 1
'Ahora aplicamos nuestras reglas y dibujamos el objeto de paginación.
'En realidad estamos guardando el código en una variable en caso de que queramos dibujarlo más de una vez.
paginación = ""
Si LastPage> 1 entonces
Pagination = Pagination & "<Divpagination" ""
Si margen <> "" o relleno <> "" entonces
Pagination = Pagination & "style =" ""
Si el margen <> "" entonces
paginación = paginación y "margen: margen"
final si
Si el relleno <> "" entonces
paginación = paginación y "relleno: relleno"
final si
paginación = paginación y "" ""
final si
Pagination = Pagination & ">"
'Botón anterior
Si la página> 1 entonces
Pagination = Pagination & "<a href =" "" & TargetPage & "& Page =" & Prev & "" "> Prev </a>"
demás
Pagination = Pagination & "<SpandIsable" "> Prev </span>"
final si
'Páginas
Si LastPage <7 + (adyacentes * 2) no, no hay suficientes páginas para que ambos lo rompan
para contador = 1 a la última página
Si contador = página entonces