Recentemente, o site foi revisado e descobriu que a página original não continha números, apenas a página inicial, a última página, a próxima página e o salto selecionado eram todos populares antes, mas agora a mais popular é que a página de números está no meio, que é pesquisada e compartilhada. Amigos que precisam podem se referir a ele.
Efeito:
Código central estrangeiro:
A cópia do código é a seguinte:
<%
'Script de paginação no estilo Digg em Asp .. Escrito por Moazam ... http://www.moazam.com/2007/03/30/asp-digg-style-pagination-script/
função getPaginationstring (página, totalItems, limite, adjacentes, targetpage)
'Padrões
se não é numérico (adjacente), então adjacentes = 1 final se
se não é numérico (limite), então limite = 15 final se
se não é numérico (página) então página = 1 fim
Se TargetPage = "" então TargetPage = "/" Fim
margin = ""
preenchimento = ""
Outros vars
prev = página - 1'Previous Page é página - 1
NextPage = Page + 1'NextPage Página é página + 1
lastpage = teto (totalItems, limite) 'lastpage is = Total de itens / itens por página, arredondado.
LPM1 = LASTPAGE - 1'LAST PÁGINA menos 1
'Agora aplicamos nossas regras e desenhamos o objeto de paginação.
'Na verdade, estamos salvando o código em uma variável, caso queremos desenhá -lo mais de uma vez.
paginação = ""
Se LastPage> 1 então
paginação = paginação e "<Divpaginação" ""
Se margem <> "" ou estofamento <> "" então
paginação = paginação e "style =" ""
Se margem <> "" então
paginação = paginação e "margem: margem"
final se
Se preencher <> "" então
paginação = paginação e "preenchimento: preenchimento"
final se
paginação = paginação e "" ""
final se
paginação = paginação e ">"
'Botão anterior
Se página> 1 então
paginação = paginação e "<a href =" "" & TargetPage & "& Page =" & Anterior & "" "Anterior </a>"
outro
paginação = paginação e "<Spandisabled" "Anterior </span>"
final se
'Páginas
Se LastPage <7 + (adjacentes * 2), não é páginas suficientes para quebrá -lo
para contador = 1 para a última página
se contador = página então