Tout le monde sait que l'affichage paginé des jeux d'enregistrements peut être facilement implémenté dans Dreamwerver, mais le code généré est en effet très volumineux, ce qui affecte la vitesse d'affichage de la page Web, et ne semble pas très clair. Alors, la même chose peut-elle être. réalisé de manière simple ? Qu'en est-il de la fonction ? Bien sûr, je peux utiliser le code simple suivant pour réaliser l'affichage de pagination de l'ensemble d'enregistrements. Je vais maintenant le partager avec tout le monde.
Les principaux codes sont les suivants :
＜%
Si rs1.recordcount>0 Then 'Si le jeu d'enregistrements n'est pas vide, traitez l'enregistrement rs1.pagesize = 10 'Définissez le nombre d'enregistrements affichés sur chaque page num=rs1.recordcount 'Nombre total d'enregistrements pagenum=rs1.pagecount ' Nombre total de pages page=request(" page") 'Obtenir les informations originales du numéro de page' Le début du traitement des informations originales du numéro de page !
Si page ＜＞ "" alors
page = cint(page)
si numéro d'erreur ＜＞ 0 alors
err.clear
page=1
finir si
si page < 1 alors
page=1
finir si
autre
page=1
Terminer si
si page*rs1.pagesize ＞ num et non ((page-1)*rs1.pagesize ＜ num) alors
page=1
finir si
'Fin du traitement des informations originales du numéro de page ! Définir le numéro de page actuel rs1.absolutepage = page
%>
<!--Jugez si la page actuelle est la dernière page et définissez l'affichage répété des enregistrements en fonction du jugement-->
＜% si page＜＞pagenum alors
lablenum=rs1.pagesize
autre
lablenum=num-(page-1)*rs1.pagesize
finir si
pour i=1 à labelnum
%>
＜tr bgcolor="#FFFFFF"＞
＜td height="25"＞＜div align="center"＞＜%=(rs1.Fields.Item("id").Value)%＞＜/div＞＜/td＞
＜td＞＜div align="center"＞＜%=(rs1.Fields.Item("name").Value)%＞＜/div＞＜/td＞
＜td＞＜div align="center"＞＜%=(rs1.Fields.Item("Address").Value)%＞＜/div＞＜/td＞
＜td＞＜div align="center"＞＜%=(rs1.Fields.Item("Category").Value)%＞＜/div＞＜/td＞
＜td＞＜div align="center"＞＜%=(rs1.Fields.Item("Dernière modification").Value)%＞＜/div＞＜/td＞
＜td＞＜div align="center"＞＜%=(rs1.Fields.Item("Modifier").Value)%＞＜/div＞＜/td＞
＜/tr＞
<%
rs1.movenext
suivant
%>
<!--L'affichage de l'enregistrement de la page en cours se termine, le code suivant est le code du lien de pagination du jeu d'enregistrements-->
＜table width="70%" border="0" align="center" cellpadding="0" cellpacing="0"＞
＜tr＞
＜td hauteur="35"＞
<div align="right">
＜couleur de police="#333333">
Il y a ＜%=num%＞ liens au total|
＜a href=linkadmin.asp?page=1＞Page d'accueil＜/a＞ |
＜%if page＞1 then%＞＜a href=linkadmin.asp?page=＜%=page-1%＞＞＜%end if%＞Page précédente＜/a＞ |
＜%if page＜pagenum then%＞＜a href=linkadmin.asp?page=＜%=page+1%＞＞＜%end if%＞Page suivante＜/a＞ |
＜a href=linkadmin.asp?page=＜%=pagenum%＞＞Dernière page＜/a＞ |
Page :＜%=page%＞/＜%=pagenum%＞page |
Total ＜%=pagenum%＞pages＜/police＞
＜/div＞
＜/td＞
＜/tr＞
＜/tableau＞
<!--Le code du lien de pagination du jeu d'enregistrements se termine et le code suivant est exécuté lorsque le jeu d'enregistrements est vide-->
＜%autre%＞
＜tr bgcolor="#FFFFFF"＞
＜td height="25" colspan="6"＞＜div align="center"＞＜% réponse.Write("Aucun résultat à afficher !") %＞
＜/div＞＜/td＞
＜/tr＞
<%
finir si
rs1.Close()
Définir rs1 = Rien
%>
D'accord, c'est très simple ! Effectuez simplement une simple modification et vous pourrez l'insérer à l'endroit où l'enregistrement est affiché sur votre page Web. Essayez-le maintenant !