Dieser Artikel wurde vollständig getestet und unterstützt ASP+ACCESS und ASP+SQL. Bitte ändern Sie die relevanten Teile.
Beachten Sie, dass ich mich weigere, voreilig grundlegende Fragen zu beantworten. Wenn Sie ihn immer noch nicht verstehen, können Sie auf andere Spalten auf dieser Website verweisen.
<!--#include file="conn.asp"-->
<% 'Das Obige enthält Datenbankverbindungsdateien
'-----------------Startdatenbank abfragen
set rs=server.CreateObject("adodb.recordset")
rs.open "Wählen Sie * aus Büchern aus, in denen nach ID desc sortiert wird",conn,1,1
wenn err.number<>0 dann
Response.write „Keine Daten in der Datenbank“
Ende wenn
'------------------------------Paging beginnt
wenn rs.recordcount=0 dann
repose.write „Keine Daten“
anders
rs.PageSize =10 'Anzahl der Datensätze pro Seite
iCount=rs.RecordCount 'Gesamtzahl der Datensätze
iPageSize=rs.PageSize
maxpage=rs.PageCount
page=request("page")
wenn nicht IsNumeric(page) oder page="" dann
Seite=1
anders
page=cint(Seite)
Ende wenn
Wenn Seite <1, dann
Seite=1
elseif page>maxpage then
page=maxpage
Ende wenn
rs.AbsolutePage=Seite
wenn page=maxpage dann
x=iCount-(maxpage-1)*iPageSize
anders
x=iPageSize
Ende wenn
Für i=1 bis x
Artikel, die Sie interessieren könnten:
Aktuelle Seite 1/2