Jeder weiß, dass die Paging-Anzeige von Datensatzsätzen in Dreamwerver leicht implementiert werden kann, aber der generierte Code ist tatsächlich sehr groß, was sich auf die Anzeigegeschwindigkeit der Webseite auswirkt und nicht sehr klar zu sein scheint auf einfache Weise erreicht? Wie sieht es mit der Funktion aus? Natürlich kann ich den folgenden einfachen Code verwenden, um die Paging-Anzeige des Datensatzes zu realisieren. Jetzt werde ich ihn mit allen teilen.
Die Hauptcodes lauten wie folgt:
＜%
Wenn rs1.recordcount>0 Dann 'Wenn der Datensatz nicht leer ist, verarbeiten Sie den Datensatz rs1.pagesize = 10 'Legen Sie die Anzahl der auf jeder Seite angezeigten Datensätze fest num=rs1.recordcount 'Gesamtzahl der Datensätze pagenum=rs1.pagecount ' Gesamtzahl der Seiten page=request(" page") 'Erhalten Sie die Originalinformationen der Seitenzahl' Der Beginn der Verarbeitung der Originalinformationen der Seitenzahl!
Wenn Seite ＜＞ "", dann
Seite = Cint(Seite)
wenn Fehlernummer ＜＞ 0 dann
irr.klar
Seite=1
Ende wenn
wenn Seite < 1 dann
Seite=1
Ende wenn
anders
Seite=1
Ende wenn
if page*rs1.pagesize ＞ num und not((page-1)*rs1.pagesize ＜ num)then
Seite=1
Ende wenn
'Ende der Verarbeitung der Originalinformationen zur Seitenzahl! Legen Sie die aktuelle Seitennummer fest: rs1.absolutepage = page
%>
<!--Beurteilen Sie, ob die aktuelle Seite die letzte Seite ist, und legen Sie die wiederholte Anzeige von Datensätzen basierend auf der Beurteilung fest-->
＜% wenn Seite＜＞Seitenum dann
lablenum=rs1.pagesize
anders
lablenum=num-(page-1)*rs1.pagesize
Ende wenn
für i=1 bis 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("Last changes").Value)%＞＜/div＞＜/td＞
＜td＞＜div align="center"＞＜%=(rs1.Fields.Item("Modifier").Value)%＞＜/div＞＜/td＞
＜/tr＞
<%
rs1.movenext
nächste
%>
<!--Die Datensatzanzeige der aktuellen Seite endet. Der folgende Code ist der Datensatzsatz-Paging-Link-Code-->
＜table width="70%" border="0" align="center" cellpadding="0" cellspacing="0"＞
<tr>
＜td height="35"＞
<div align="right">
＜Schriftfarbe="#333333">
Insgesamt gibt es ＜%=num%＞ Links|
＜a href=linkadmin.asp?page=1＞Homepage＜/a＞ |
＜%if page>1 then%＞＜a href=linkadmin.asp?page=＜%=page-1%＞＞＜%end if%＞Vorherige Seite＜/a＞ |
＜%if page＜pagenum then%＞＜a href=linkadmin.asp?page=＜%=page+1%＞＞＜%end if%＞Nächste Seite＜/a＞ |
＜a href=linkadmin.asp?page=＜%=pagenum%＞＞Letzte Seite＜/a＞ |
Seite:＜%=Seite%＞/＜%=Seitenum%＞Seite |
Insgesamt ＜%=Seitenum%＞Seiten＜/Schriftart＞
＜/div＞
＜/td＞
＜/tr＞
＜/Tabelle＞
<!--Der Datensatzsatz-Paging-Link-Code endet und der folgende Code wird ausgeführt, wenn der Datensatzsatz leer ist-->
<%else%＞
＜tr bgcolor="#FFFFFF"＞
＜td height="25" colspan="6"＞＜div align="center"＞＜% Response.Write("Keine Ergebnisse zum Anzeigen!") %＞
＜/div＞＜/td＞
＜/tr＞
<%
Ende wenn
rs1.Close()
Setze rs1 = Nichts
%>
Okay, es ist ganz einfach! Nehmen Sie einfach eine einfache Änderung vor und Sie können sie an der Stelle einfügen, an der der Datensatz auf Ihrer Webseite angezeigt wird. Probieren Sie es jetzt aus!