Cet article a été entièrement testé et prend en charge ASP+ACCESS et ASP+SQL. Veuillez modifier les parties pertinentes.
Notez que je refuse de répondre à la hâte aux questions basiques. Ce code est déjà très simple. Si vous ne le comprenez toujours pas, vous pouvez vous référer aux autres colonnes de ce site.
<!--#include file="conn.asp"-->
<% 'Ce qui précède contient des fichiers de connexion à la base de données
'--------------------------------------------------Base de données de démarrage de la requête
set rs=server.CreateObject("adodb.recordset")
rs.open "sélectionner * parmi les livres où trier par identifiant desc", conn, 1,1
si numéro d'erreur <>0 alors
réponse.write "Aucune donnée dans la base de données"
finir si
'---------------------------------------------La recherche de personnes démarre
si rs.recordcount=0 alors
respose.write "Aucune donnée"
autre
rs.PageSize =10 'Nombre d'enregistrements par page
iCount=rs.RecordCount 'Nombre total d'enregistrements
iPageSize=rs.PageSize
maxpage=rs.PageCount
page=requête("page")
si Not IsNumeric(page) ou page="" alors
page=1
autre
page=cint(page)
finir si
si page <1 alors
page=1
sinon page>maxpage alors
page = page maximale
finir si
rs.AbsolutePage=Page
si page=maxpage alors
x=iCount-(maxpage-1)*iPageSize
autre
x = taille iPage
finir si
Pour i=1 À x
Articles qui pourraient vous intéresser :
Page actuelle 1/2