IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

ASP Discussion :

Code pour faire de la pagination


Sujet :

ASP

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre du Club
    Inscrit en
    Juillet 2007
    Messages
    6
    Détails du profil
    Informations forums :
    Inscription : Juillet 2007
    Messages : 6
    Par défaut Code pour faire de la pagination
    slt je vx le code pour creer des page en asp
    comme l image
    Images attachées Images attachées  

  2. #2
    Membre expérimenté Avatar de gderenne
    Homme Profil pro
    Développeur .NET
    Inscrit en
    Juillet 2007
    Messages
    250
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Développeur .NET

    Informations forums :
    Inscription : Juillet 2007
    Messages : 250
    Par défaut


    Ton titre n'est pas super explicite...

    Sinon, si tu as un début de code, on peut en parler.

  3. #3
    Membre expérimenté
    Profil pro
    Inscrit en
    Avril 2004
    Messages
    202
    Détails du profil
    Informations personnelles :
    Âge : 50
    Localisation : France

    Informations forums :
    Inscription : Avril 2004
    Messages : 202
    Par défaut
    ugh !

    si tu veux faire de la pagination de recordSet (à en croire ta PJ)... c'est plus compliqué qu'un simple "hello world" ou "help help help" ...

    je te propose le code que j'utilise :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
    32
    33
    34
    35
    36
    37
    38
    39
    40
    41
    42
    43
    44
    45
    46
    47
    48
    49
    50
    51
    52
    53
    54
    55
    56
    57
    58
    59
    60
    61
    62
    63
    64
    65
    66
    67
    68
    69
    70
    71
    72
    73
    74
    <%
    dim PageSize, NbPageMax
    PageSize = 20		'nombre d'éléments par page
    NbPageMax = 20		'nombre max de pages
    dim no_page
    no_page = default_value(Request("no_page"), 1)	'numéro de la page à afficher (1 par défaut)
     
    dim nb_record, nb_page
    dim rowCount
     
    nb_record = oRSt.recordcount	'nombre d'éléments à afficher (du recordSet)
    if (nb_record > (PageSize * NbPageMax)) then
    	' pas la peine d'annoncer 952 éléments si on n'en affiche que 200
    	nb_record = PageSize * NbPageMax
    	nb_page = NbPageMax
    end if
    if nb_record mod PageSize = 0 then
    	nb_page = int((nb_record/PageSize))	'nombre de pages à afficher
    else
    	nb_page = int((nb_record/PageSize)+1)
    end if
    rowCount = 0
    oRSt.pageSize = PageSize
     
    'on affiche la pagination
    if nb_page > 1 then
    	response.Write nb_record & " éléments<br>" & nb_page & " pages de résultat : "
    	if nb_page > 1 then
    		for i = 1 to nb_page
    			if i < nb_page then
    				oRSt.AbsolutePage = i + 1
    				oRSt.MovePrevious
    			else
    				oRSt.MoveLast
    			end if
    			oRSt.AbsolutePage = i
    			if i <= pNbMaxPage then
    				Response.Write "<a href=""[URL.asp?prm=...]&no_page=" & i & """>"
    				if cInt(no_page) = i then Response.Write "<b>" & i & "</b>" else Response.Write i end if
    				Response.Write "</a>&nbsp;"
    			end if
    		next
    	end if
    	response.write "<hr>"
    end if
    'on se positionne dans le RecordSet
    oRst.AbsolutePage = no_page %>
    <tr>[les en-têtes de colonne]</tr><%
    'on affiche les lignes
    do until (oRst.EOF or rowCount = oRst.pageSize)
    	rowCount = rowCount + 1		'pour compter les lignes traitées
    	%><tr>[la ligne]</tr><%
    	oRst.Movenext
    Loop
    'on remet la pagination
    if nb_page > 1 then
    	response.write "<hr>"
    	if nb_page > 1 then
    		for i = 1 to nb_page
    			if i < nb_page then
    				oRSt.AbsolutePage = i + 1
    				oRSt.MovePrevious
    			else
    				oRSt.MoveLast
    			end if
    			oRSt.AbsolutePage = i
    			if i <= pNbMaxPage then
    				Response.Write "<a href=""[URL.asp?prm=...]&no_page=" & i & """>"
    				if cInt(no_page) = i then Response.Write "<b>" & i & "</b>" else Response.Write i end if
    				Response.Write "</a>&nbsp;"
    			end if
    		next
    	end if
    end if %>
    Ce code considère que tu as un RecordSet oRSt, il utilise une bibliothèque de fonctions maison telles que default_value [permet d'avoir une valeur par défaut à une variable], ne t'inquiète donc pas si on te dit que "default_value n'est pas définie"

  4. #4
    Membre expérimenté
    Profil pro
    Inscrit en
    Avril 2004
    Messages
    202
    Détails du profil
    Informations personnelles :
    Âge : 50
    Localisation : France

    Informations forums :
    Inscription : Avril 2004
    Messages : 202
    Par défaut
    bonjour Biniki,

    alors, tu ne te manifestes plus ? avais-je bien compris ta question ? si oui, est-ce que j'y ai répondu ?

    Nicolas.

  5. #5
    Membre du Club
    Inscrit en
    Juillet 2007
    Messages
    6
    Détails du profil
    Informations forums :
    Inscription : Juillet 2007
    Messages : 6
    Par défaut merci
    meci comme meme

Discussions similaires

  1. Ecrire du code pour faire un POST de formulaire
    Par thomine dans le forum Servlets/JSP
    Réponses: 7
    Dernier message: 06/11/2008, 13h05
  2. Réponses: 2
    Dernier message: 26/04/2008, 11h20
  3. [Tableaux] probleme avec mon code pour faire un parseur !
    Par Joe-La-Boule dans le forum Langage
    Réponses: 10
    Dernier message: 11/10/2006, 15h35
  4. code pour faire une migration
    Par rollins_ng dans le forum MS SQL Server
    Réponses: 6
    Dernier message: 11/08/2006, 21h18

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo