Todo el mundo sabe que la visualización de paginación de conjuntos de registros se puede implementar fácilmente en Dreamwerver, pero el código generado es realmente muy grande, lo que afecta la velocidad de visualización de la página web y no parece muy claro. Entonces, ¿puede ser lo mismo? logrado de una manera simple? ¿Qué pasa con la función? Por supuesto, puedo usar el siguiente código simple para realizar la visualización de paginación del conjunto de registros. Ahora lo compartiré con todos.
Los códigos principales son los siguientes:
＜%
Si rs1.recordcount>0 Entonces 'Si el conjunto de registros no está vacío, procese el registro rs1.pagesize = 10 'Establezca el número de registros que se muestran en cada página num=rs1.recordcount 'Número total de registros pagenum=rs1.pagecount ' Número total de páginas página = solicitud ("página") 'Obtener la información original del número de página' ¡El comienzo del procesamiento de la información original del número de página!
Si página ＜＞ "" entonces
página = cinta(página)
si número de error ＜＞ 0 entonces
errar.claro
página=1
terminar si
si la página <1 entonces
página=1
terminar si
demás
página=1
terminar si
si página*rs1.pagesize ＞ num y no ((page-1)*rs1.pagesize ＜ num)entonces
página=1
terminar si
'¡Fin del procesamiento de la información original del número de página! Establecer el número de página actual rs1.absolutepage = página
%>
<!--Juzgue si la página actual es la última página y configure la visualización repetida de registros según el juicio-->
＜% si página ＜＞páginanum entonces
lablenum=rs1.tamaño de página
demás
lablenum=num-(página-1)*rs1.tamañodepágina
terminar si
para i=1 a labelnum
%>
＜tr bgcolor="#FFFFFF"＞
＜td height="25"＞＜div align="center"＞＜%=(rs1.Fields.Item("id").Value)%＞＜/div＞＜/td＞
＜td＞＜div align="center"＞＜%=(rs1.Fields.Item("nombre").Value)%＞＜/div＞＜/td＞
＜td＞＜div align="center"＞＜%=(rs1.Fields.Item("Dirección").Value)%＞＜/div＞＜/td＞
＜td＞＜div align="center"＞＜%=(rs1.Fields.Item("Category").Value)%＞＜/div＞＜/td＞
＜td＞＜div align="center"＞＜%=(rs1.Fields.Item("Última modificación").Value)%＞＜/div＞＜/td＞
＜td＞＜div align="center"＞＜%=(rs1.Fields.Item("Modifier").Value)%＞＜/div＞＜/td＞
＜/tr＞
<%
rs1.movenext
próximo
%>
<!--La visualización del registro de la página actual finaliza, el siguiente código es el código de enlace de paginación del conjunto de registros-->
＜ancho de tabla="70%" border="0" align="center" cellpadding="0" cellpacing="0"＞
＜tr＞
＜altura td="35"＞
<div align="derecha">
<color de fuente="#333333">
Hay ＜%=num%＞ enlaces en total|
＜a href=linkadmin.asp?page=1＞Página de inicio＜/a＞ |
＜%si página＞1 entonces%＞＜a href=linkadmin.asp?page=＜%=página-1%＞＞＜%end if%＞Página anterior＜/a＞ |
＜%si página＜pagenum entonces%＞＜a href=linkadmin.asp?page=＜%=página+1%＞＞＜%end if%＞Página siguiente＜/a＞ |
＜a href=linkadmin.asp?page=＜%=pagenum%＞＞Última página＜/a＞ |
Página:＜%=página%＞/＜%=pagenum%＞página |
Total ＜%=pagenum%＞páginas＜/fuente＞
＜/div＞
＜/td＞
＜/tr＞
＜/mesa＞
<!--El código del enlace de paginación del conjunto de registros finaliza y el siguiente código se ejecuta cuando el conjunto de registros está vacío-->
＜%else%＞
＜tr bgcolor="#FFFFFF"＞
＜td height="25" colspan="6"＞＜div align="center"＞＜% respuesta.Write("¡No hay resultados para mostrar!") %＞
＜/div＞＜/td＞
＜/tr＞
<%
terminar si
rs1.Cerrar()
Establecer rs1 = Nada
%>
¡Vale, es muy sencillo! Simplemente haga una simple modificación y podrá insertarlo en el lugar donde se muestra el registro en su página web. ¡Pruébelo ahora!