Parcours du resultat d'une requetes sous VBA

darkman972 Messages postés 90 Statut Membre -  
 Utilisateur anonyme -
Bonjour a tous

Voila mon prob. Quand je parcours le resultat d'une requetes ACCESS faite a partir de VBA, il me lit mes informations dans n'importe quel ordre. quelqu'un saurait comment faire pourqu'il commence au premier enregistrement et s'arrete au dernier??

Merci

Lionel

5 réponses

  1. maily Messages postés 7560 Statut Contributeur 453
     
    Bonjour...

    après recherche dans mes archives, tu fais comme ça:

    rstExample.MoveFirst
    
    do while rstExample.EOF = false 
    


    Sachant que rstExample est un recordset!!
    Bon courage
    Maily   :-))))
    0
    1. chris
       
      Bonjour mayli, j'ai vu que tu a donne des conseils concernant VBA et requetes
      j'ai un pb avec tous les Liste.MoveNext, Liste.RecordCount, Liste.EOF. Le message d'erreur est : Propiété ou methode non geree par cet objet (erreur 408)

      tout le reste est ok (connection, execution de la requete, ...)
      j'ai coché dans les references : Microsoft ActiveX Database Objects v2.5

      saurais tu ce qu'il faut que je coche en plus ?

      merci
      chris
      0
      1. Utilisateur anonyme > chris
         
        ouvre un nouveau post stp

        kinder.surprise,
        le maton du matou
        0
    2. chris
       
      concernant l'erreur : Propiété ou methode non geree par cet objet (erreur 408)
      tu viens de me repondre : "ouvre un nouveau post stp"
      mais en temps que novice, je ne sais pas ce que ca signifie

      pourrais-tu m'eclairer ?
      merci
      chris
      0
      1. Utilisateur anonyme > chris
         
        pense à lire la charte et l'encart en bas du formulaire d'envoi chris. Ca veut dire: nouvelle question = nouveau message sur le forum, il ne faut pas poster dans le message d'une question de quelqu'n d'autre, sauf évidemment pour répondre ou si c'est vraiment dans le fil de la conversation, c'est pas trop sympa pour le posteur initial (-:

        kinder.surprise,
        le maton du matou
        0
  2. darkman972 Messages postés 90 Statut Membre 9
     
    ok je teste

    merci
    0
  3. darkman972 Messages postés 90 Statut Membre 9
     
    en fait c'est pas ca le prob désolé.

    voila ce que je fais:

    PerMax = 0
    For indice = 1 To nbrofrecs - 1 Step 1
    Per1 = req.Fields("lastdate")
    req.MoveNext
    Per2 = req.Fields("lastdate")

    If Per1 <= Per2 Then
    pertemp = Per2
    Else
    pertemp = Per1
    End If

    If PerMax <= pertemp Then
    PerMax = pertemp
    indmax = indice
    End If
    Next

    En fait j'ai besoin de garder indmax pour povoir retourner a cet enregistrement precis apres pour pouvoir récuperer les données.
    Mais quand j'y retourne ca me donne la donnée qui suit et pas celle dont j'ai besoin.
    0
  4. Utilisateur anonyme
     
    Essaye ceci:

    PerMax = 0
    req.MoveFirst
    For indice = 1 To nbrofrecs - 1 Step 1
    Per1 = req.Fields("lastdate")
    req.MoveNext
    Per2 = req.Fields("lastdate")

    If Per1 <= Per2 Then
    pertemp = Per2
    Else
    pertemp = Per1
    End If

    If PerMax <= pertemp Then
    PerMax = pertemp
    indmax = indice
    End If
    Next indice

    Rien n'est plus dangereux qu'une idée quand on a 
    qu'une idée
      :-)
    0
  5. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  6. darkman972 Messages postés 90 Statut Membre 9
     
    ok merci j'essaierai ca
    0