Wir haben bereits früher über das Paginationsprogramm gesprochen. Hier bieten wir Ihnen einen und analysieren es, und Sie können neue Gewinne erzielen.
Die Codekopie lautet wie folgt:
<%
'Das folgende Programm ist Teil des Code des Artiking -Technologie -Artikelsystems auf meiner Website und konzentriert sich auf die Hervorhebung der Pagination. Daher werden andere nutzlose Codes gelöscht. Sie können sie ändern und anwenden
onErrorresumeNext 'verhindert, dass Benutzer URLs nach Belieben ändern, um Fehler zu verursachen
IFREQUEST.queryString ("Seite") = "" thenpage = 1: else: page = cint (request.queryString ("page") '' '' Die Anzahl der Seiten zur URL -Seite =?
setLink1 = server.createObject ("adodb.Connection") 'Verbindungsdatenbank
link1.open "provider = microsoft.jet.oledb.4.0; dataSource =" & server.mappath ("Datenbank 1.MDB")
setrs = server.createObject ("adodb.recordset")
rs.open "Auswählen*aus Tabelle 1", Link 1,1,1 'Diese Sätze definieren den Cursor des Datensatzsatzes, die Anzahl der pro Seite gespeicherten Datensätze und die aktuellen Seiteneinstellungen, was sehr wichtig ist.
Rs.PageSize = 13
Rs.absolutepage = Seite
Ifr.number <> 0Then 'verhindert, dass Benutzer URLs und Datenbank böswillig ohne Datensätze ändern
"Ausnahmefehler ist aufgetreten" Antwort.Write
Antwort.end
Endif
%>
<baseTarget = '_ leer'> <!-Inhalte in einem neuen Fenster aufgetaucht->
<TableBorder = 1>
<%
fei = 0tors.pageSize-1 'Zeigt den spezifischen Dateninhalt an. I+(Seite*13-13) +1 Diese Lösung zeigt die spezifische Zahl nach dem Paging.
ifrs.eofthenexitfor
Antwort.Write "<tr> <td>" & i+(Seite*13-13) +1 & ": <Ahref = '" & rs ("Connect") & "'> & rs (" Autor ") &" </a> </td> </tr> "
Rs.Movenext
nächste
%>
<tr> <tdalign = rechts>
<baseTarget = '_ top'> <!-Machen Sie die Paging-Verbindung nicht im neuen Fenster auftauchen. Das Folgende ist das vollständige Programm des perfekten Paging -Programms, auf das ich mich konzentrieren möchte. Sie können es nach Bedarf ändern->
<%
pagelen = split (request.servervariables ("query_string"), "&") 'Holen Sie sich die Parameter -URL nach der URL? Nummer
IFUBOUND (PAGELEN) <1Then'wenn die URL vom Typ xxx.asp? Seite = 1 oder xxx.asp ist, verwenden Sie die Standardpaginierungsmethode
ifPage> 1ThenResponse.Write "<aRef = 'A.asp? Page = 1'> Home </a> <Ahref = 'A.asp? Page =" & page-1 & "'> vorherige Seite </a>": eles: response.write "homepage"
ifPage <rs.pageCountThenResponse.Write "<Ahref = 'A.asp? Page =" & Seite+1 & "'> nächste Seite </a> <aRef = 'A.asp? page =" & rs.pagecount & "' Letzte Seite </a>": eles: response.write "nächste Seite".
fei = 1Tors.PageCount
ifi = pagethenResponse.writei & "": else: response.write "<aHref = 'A.asp? page =" & i & "'>" & i & "</a>"