Pagination

coralie - 25 juil. 2001 à 19:58
 Cedric - 27 juil. 2001 à 15:51
voila , je veux extraire les données de ma base sur plusieurs pages,10 resulta par pages, j'arrive à afficher 10 résultat mais j'ai pas le lien vers les autres pages.
merci de donner un exemple de script.
coralie

1 réponse

Je vais pas te donner le code mais plutôt la méthode la plus simple qui existe mais pas la meilleure (je pense ;-)

<%
' n° d'enregistrement du début
if len(request.querystring("valeur_curseur"))<>0 then
valeur_curseur=request.querystring("valeur_curseur")
else
valeur_curseur=0
end if

'ouverture de ta base de données + recordset
Set objConn...blah blah
set objRec...blah blah
' requète sql
sqlReq="SELECT * FROM machin"
objRec.Execute sqlReq,objConn,adOpenStatic
nbr_enregistrements=objRec.RecordCount
' boucle qui passe des enregistrement
for x=0 to valeur curseur
objRec.MoveNext
next

' affichage des enregistrements
max=valeur_curseur+10
if max>nbr_enregistrement then
max=10-(valeur_curseur+10-nbr_enregistrement)
end if
for x=1 to max
response.write...blah blah
next

' lien "Previous"
if valeur_curseur<>0 then
previous=valeur_curseur-10
if previous<0 then
previous=0
end if
response.write "10 précédents
"
end if

'lien "Next"
next=valeur_curseur+10
if next<nbr_enregistrements then
response.write "10 suivants
"
end if

%>

voilà c'est vite fait, j'ai pas testé le code mais je pense que c'est une bonne base de travail...

;)
0
Rejoignez-nous