Postagens
Male
contato@garrasolucoes.com.br
Pessoal,
Estou com problemas numa paginação de um site que estou fazendo, ela abre na sequência ou seja 1-50 e acaba distorcendo todo o layout conforme anexo.
O que eu quero é fazer como o google, que chega em determina página passa pra outra, exemplo 1-10,10-20,20-30.
O código existente atualmente é:
' Monta a paginação
Sub sMontaPaginacao (numPaginas, paginaAtual)
Dim contPaginas
If numPaginas Then
Response.Write "Páginas: "
For contPaginas = 1 To numPaginas
Response.Write "<a href=""javascript:void(carregarPagina(" & contPaginas & "))"" class=""linkpaginacao"" title="""">"
If contPaginas = paginaAtual Then
Response.Write "<strong>[ " & contPaginas & " ]</strong>"
Else
Response.Write contPaginas
End If
Response.Write "</a> "
Next
End If
End Sub
Alguém pode me ajudar?
Att.
João Henrique
