Befolgen Sie vollständig das normale Artikelsystem. Das Hinzufügen von Artikeln, das Abrufen von Artikeln und die Artikeldetailseite erfolgen alle auf die übliche Weise. Eine Beschreibung finden Sie hier.
Es ist zu beachten, dass [Seite] die Leerzeichen in der Mitte löschen muss, da es mit dem Hintergrund-Paging von Script Home wiederholt wird, Leerzeichen hinzugefügt werden.
Fügen Sie beim Hinzufügen eines Artikels einen Seitenumbruch an der Stelle ein, an der er eingefügt werden soll: [Seite] (Natürlich können Sie dieses Symbol auch beiläufig verwenden, z. B.: [Seite], &&&, ###, @@@.) ., solange es nicht dort erscheint, wo der Artikel normalerweise angezeigt werden sollte.)
Ich habe vier Seiten verwendet, die Eingabeseite (index.asp), die Eingabevervollständigungsseite (add.asp), die Artikellistenseite (view.asp) und die Artikelinhaltsseite (text.asp). Wenn Sie sich die folgende Einführung ansehen, denke ich, dass normale Vögel dies tun können. Der Schlüssel ist der letzte Text.asp, alle Codes zum Implementieren von Paging sind hier.
Schritt 2: Kommen Sie
Machen Sie einige Tricks im dynamischen Datenteil des Artikelkörpers. Das Folgende ist der Code und die Erklärung:
Kopieren Sie den Code wie folgt:„Hier ist der Code für die Paging-Verarbeitung
“ Um auf der sicheren Seite zu sein, verwenden wir die Ersetzungsfunktion, um vor und nach dem Paging-Code ein Leerzeichen in voller Breite einzufügen.
MMText=replace(rs(contents),[ Seite ], [ Seite ] )
MMfText= split(MMText,[ Seite ])
'Ubound-Funktion verwenden, um die Anzahl der zu teilenden Seiten zu ermitteln. Beachten Sie, dass der Indexwert bei 0 beginnt.
contentNum=ubound(MMfText)
page=Clng(request(page))
if page<1 then
page=1
end if
'Um intuitiver auszusehen, setzen wir die Startseite auf 1 und addieren dann 1 zur Gesamtzahl der Seiten,
wenn page>contentNum+1 then
page=contentNum+1
end if
'Ändern Sie die Variable der anzuzeigenden Seite, die Sie aus dem obigen URL-Parameter erhalten haben, und zeigen Sie die Seite in einer Schleife
für i=page
an, umdie Antwort zu pagen.write MMfText(i-1)
next
' Paginierung auflisten,
wenn cint(contentNum)>0 then
if page<>1 then
Response.write <a href='text.asp?id=&request(id)&&page=&page-1&'>[Vorherige Seite]</a>
end if
'Denken Sie daran, dass der tiefgestellte Wert von stammt Beginnend bei 0 beginnen wir hier mit dem Paging bei 1 und addieren 1 zur Gesamtsumme
für p=1 zu contentNum+1,
wenn page=p, dann
Response.write <a href='text.asp?id=&request(id)&&page= &p&'> <font color=red>[&p&]</font></a>
else
Response.write <a href='text.asp?id=&request(id)&&page=&p&'>[&p&]</a>
end if
next
if page<>contentNum+1 then
Response.write <a href='text.asp?id=&request(id)&&page=&page+1&'>[next page]</a>
end if
end Wenn
unten Artikel von anderen Websites aufgeführt sind, können Sie auch auf diese verweisen.
Lange Artikelseiten werden mit Seitenumbrüchen angezeigt. Ich möchte ASP verwenden, um diese Funktion zu implementieren, aber ich kann feststellen, dass es nur eine Methode zur Paginierung gibt, die auf der Anzahl der Wörter basiert. Diese Methode weist jedoch einen Fehler auf Wenn Ihr Artikelinhalt UBB-Code enthält, ist dies sehr einfach. Dies führt zu einer Paginierung zwischen [code][/code] oder zerlegt einfach [code] in [co und de], was zu Fehlern in der Artikelanzeige führt.
Die folgenden Schritte machen dies möglich.
Schritt 1:
Folgen Sie dem normalen Artikelsystem. Das Hinzufügen von Artikeln im Hintergrund, das Abrufen von Artikeln und die Detailseiten von Artikeln erfolgen auf die übliche Weise. Eine Beschreibung finden Sie hier. Fügen Sie beim Hinzufügen eines Artikels einen Seitenumbruch an der Stelle ein, an der er eingefügt werden soll: ||| (Natürlich können Sie dieses Symbol auch beiläufig verwenden, z. B.: [ Seite ], &&&, ###, @@@..., solange es nicht dort erscheint, wo der Artikel normalerweise angezeigt werden soll.)
Ich habe vier Seiten verwendet, die Eingabeseite (index.asp) und die Eingabeabschlussseite (Hinzufügen).ASP), Artikellistenseite (View.ASP), Artikelinhaltsseite (Display.ASP), die ersten drei sind Seiten, die nicht verarbeitet werden müssen. Wenn ich mir das Bild unten ansehe, denke ich, dass normale Vögel dies können Machen Sie es. Der Schlüssel ist die letzte A displasy.asp, der gesamte Code zum Implementieren von Paging ist hier.
Schritt 2:
Führen Sie einige Tricks im dynamischen Datenteil des Artikeltextes aus. Nachfolgend finden Sie den Code und die Erklärung:
Kopieren Sie den Code wie folgt:
<%
'Hier müssen wir die empfangenen Paging-Parameter verarbeiten, um den Inhalt welcher Seite anzuzeigen
.' Die folgenden zwei Sätze sollen dafür sorgen, dass die Variable pageNum den Wert der ersten Seite annimmt, wenn kein Seitenparameter übergeben wird: 0
If Request(page)= Then
pageNum=0
'Andernfalls weisen Sie der Variablen den Wert des Parameters in der übergebenen Seite zu
, um andereSeiten
anzuzeigenElse
pageNum=Request(page)
End if
%>
<%
'Wenn Sie optionalen Ausführungs-UBB-Code hinzufügen, können Sie den folgenden
Code hinzufügen'rs(NoUBB) ist das Feld in der Datenbank zum Deaktivieren von UBB, 0 bedeutet Deaktivieren, 1 bedeutet Ausführung
Wenn rs(NoUBB)=0 then
'Um Fehler beim Herstellen einer Verbindung zum Artikelinhalt zu vermeiden, verwenden Sie die Funktion Ersetzen, um vor und nach dem Paging-Code ein
Textfeld in
voller Breite hinzuzufügen. |||Datenbank hinzufügen, UBB hier hinzufügen oder UBB deaktivieren
Content=Replace((unHTML(rs(content))),|||, ||| )
Elseif rs(NoUBB)=1 then
Content=Replace((ubb(rs(content))),|||, || |. )
End if
%>
<%
'Hier ist der Schlüssel
' Wir verwenden die Split-Funktion, um den Artikel in Abschnitten herauszunehmen und sie in der Variablen content zu speichern
ContentStr=split(Content,|||)
'Entsprechend der Variable, die angezeigt werden soll, die gerade aus dem URL-Parameter erhalten wurde, wird die Seite in einer Schleife angezeigt.
For i=pageNum to pageNum
%>
<!--Dies wird der Textinhalt des Artikels sein-->
<%= ContentStr %>
< % Next %>
</td>
</tr>
<tr>
<td height=30 class=ClassName>Dieser Artikel ist unterteilt in
<%
'Verwenden Sie im Seitenbereich ubound(ContentStr), um zu ermitteln, in wie viele Seiten der Artikel unterteilt ist. Beachten Sie, dass er bei 0 beginnt, sodass die Gesamtzahl der Seiten um 1 addiert werden muss.
Für p = 0 bis ubound(ContentStr )
'Der Link ist immer noch diese Seite, aber der Artikel Ein Paging-Parameter muss nach dem ID-Parameter hinzugefügt werden: page
%>
<a href=display.asp?ID=<%=rsquest(ID)%>&page=<%= p%> class=><%=p+ 1%></a>
Die Seite <% Next %>
ist sehr einfach, wenn alle Kommentare gelöscht werden. Sie muss jedoch noch verarbeitet werden, damit sie die Funktionen zum Hervorheben der vorherigen Seite und der nächsten Seite haben kann aktuelle Seite. Es wird perfekt sein.
Es wurde getestet. Sofern der Seitenumbruch nicht im Artikel erscheint, werden alle Arten von Fehlern nicht schiefgehen. Natürlich können Sie die Anzahl von ||| erhöhen, zum Beispiel: |||||, und das wird auch der Fall sein Es ist in Ordnung, wenn im Artikel sechs oder weniger vorkommen, aber wenn es mehr als sechs sind, wird es einfach einen guten Seitenumbruch geben.