Parcours du resultat d'une requetes sous VBA
darkman972
Messages postés
90
Date d'inscription
Statut
Membre
Dernière intervention
-
Utilisateur anonyme -
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
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
A voir également:
- Parcours du resultat d'une requetes sous VBA
- Resultat foot - Télécharger - Vie quotidienne
- Lexer resultat - Télécharger - Sport
- Mes parcours google - Guide
- Excel compter cellule couleur sans vba - Guide
- Resultat loto d'aujourd'hui rdc ✓ - Forum Excel
5 réponses
Bonjour...
après recherche dans mes archives, tu fais comme ça:
Sachant que rstExample est un recordset!!
Bon courage
Maily :-))))
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 :-))))
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.
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.
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 :-)
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 :-)
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
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
kinder.surprise,
le maton du matou
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
kinder.surprise,
le maton du matou