Super ASP Large Page_my Conteúdo que eu escolho no blog do Applebbs
Palavra -chave Super ASP ASP Page_MY Classe Conteúdo Eu tomo a decisão
Fonte
<%
'==============================================================================================
'ShowMorepAGeasp versão
'VersionHuangjm1.00
CodeBymaomao
'CreatedAtE2004-09-28
'QQ: 5144707
'http://blog.csdn.net/maomaoysq
'WriteFormylover: o programa Huangjm'This pode ser usado e modificado gratuitamente, mas mantenha as informações acima
'
'função
'Este programa encapsula principalmente a peça de paginação de dados e a peça de exibição de dados é completamente personalizada pelo usuário.
'Suporte vários parâmetros de URL: http: //www.***.com/***.asp? AA = 1 & Page = 9 & BB = 2
'
'
'Parâmetros:
'Papgesize define o número de registros para cada página da página de paginação
'GetCurpagenum Retorna o número de conjuntos de registros da página atual. Esta propriedade é apenas leitura
'Getrs retorna um conjunto de registros paging Esta propriedade é apenas leitura
'GetConn recebe a conexão do banco de dados
'Getsql recebe declaração de consulta
'InterfaceOfclass
'ShowPage exibe a barra de navegação da página, o único método público
'
'################################################T
'Crie um objeto
'Sethjmpage = NewsShowmorepage
'Obtenha a conexão do banco de dados
'hjmpage.getConn = Conn
Declaração SQL
'hjmpage.getsql = "Selecione*deshop_bookswherenewsbook = 1OrderByBookiddesc"
'Defina os dados de registro em cada página como 20 e a tela padrão é 10.
'hjmpage.pagesize = 20
'Exibir informações de paginação, pode ser chamado em qualquer local, pode ser chamado várias vezes
'hjmpage.showPage ()
'setrs = hjmpage.getrs ()' returns RecordSet
'Mostrar dados inicia
'Você pode personalizar o método de exibição aqui
'fori = 1tohjmpage.getcurpagenum' número de registros na página atual
'Response.Writeleft (Trim (RS ("BookName")), 13) & "...."
'Rs.Movenext
'próximo
'Mostrar dados termina
'sethjmpage = nada
'###############################################D
'==============================================================================================
Constbtn_first = "<fontface =" "webdings" "> 9 </font>" 'Defina o estilo de exibição do botão da primeira página
Constbtn_prev = "<fontface =" "webdings" "> 3 </font>" 'Defina o estilo de exibição do botão na página anterior
Constbtn_next = "<fontface =" "webdings" "> 4 </font>" 'Defina o estilo de exibição do botão da próxima página
Constbtn_last = "<fontface =" "webdings" ">: </font>" 'defina o estilo de exibição do botão da última página
Constxd_align = "Center" 'define o alinhamento das informações de paginação
Constxd_width = "100%" 'define o tamanho da caixa de informações de paginação