Boucle qui fonctionne pas : help

Question

salut

voila jutilise une boucle pour afficher toutes les infos de ma base les uns a la suite des autres

ca donne ca :
set dateRS = DE.connection.execute("select nom form table")
For i = 1 to dateRS.Recordcount
dateRS.fields(i).value
next i

mais ca veut pas marcher :(

cs_starfighter · Answer

Salut

dateRS.fields(i).value veut dire que tu veut la valeur de la i nième colonne et non de la i nième ligne

utilise MoveNext avec dans le teste de la boucle dateRS.EOF

foliop · Answer

cest a dire ?

cs_starfighter · Answer

[Code]
DO WHILE not dateRS.EOF
    For i = 1 to dateRS.Fields.count
         Valeur=dateRS.fields(i).value
    next i
    dateRS.movenext
Loop
[\Code]

foliop · Answer

ca ne marche pas jai un message derreur

cs_starfighter · Answer

DE c'est quoi comme control ou objet?

Fais voir ton code complet STP

foliop · Answer

DE cest un concepteur

mon code est juste celui que je tai donné

cs_starfighter · Answer

Tu utilise ce que je t'ai donner? sinon le code que tu m'as donné est faux.

For i = 1 to dateRS.Recordcount
dateRS.fields(i).value 'Provosue une erreur car fields(i) est une colonne et non une ligne et de plus tu devrais mettre cela dans une variable car là elle n'est pas utiliser
next i

foliop · Answer

ben tu ma donné ca :  Valeur=dateRS.fields(i).value

cs_starfighter · Answer

non, j'ai donner

DO WHILE not dateRS.EOF
For i = 1 to dateRS.Fields.count
Valeur=dateRS.fields(i).value
next i
dateRS.movenext
Loop

foliop · Answer

DO WHILE not dateRS.EOF
For i = 1 to dateRS.Fields.count
Valeur=dateRS.fields(i).value
next i
dateRS.movenext
Loop

cest ce que jai mis et ca marche pas

cs_starfighter · Answer

ok, il te donne quoi comme erreur?

foliop · Answer

"Impossible de trouver logjet dans la collection correspondant au nom ou a la reference demandé"

cs_starfighter · Answer

ok, dateRS  est de quel type d'objet
de plus c'est tu utilisé le debuggeur, si oui dis moi sur quel ligne l'erreur ce fais.

foliop · Answer

comment ca que tyle dobjet ?

nan je sais pas lutiliser le debugger, desolé cest ma 1ere appli et je decouvre

cs_starfighter · Answer

peux tu m'envoyer ton projet (compresser dans un zip) à swebisson@wanadoo.fr pour que je puisse te le debugger et te corriger cela?

cs_CanisLupus · Answer

Comment sont déclarés tes objets DE et dateRS ?

Cordialement, CanisLupus

Tous les glands ne deviennent pas des chênes mais tous les chênes ont été des glands

foliop · Answer

Dim i As Integer
Dim DateRS as Recordset

foliop · Answer

ah ca marche mais ca me met 

14
14
14
14
14
13
13
13
13
13
12
12
12
12
12

cs_starfighter · Answer

qu'est ce qui n'allais pas?

foliop · Answer

Dim i As Integer etait en commentaire

par contre ca marffiche autant de resultat quil y a de nombre 

en gros ca fait : 

14
14
14
13
13
13
12
12
12

alors que ca devrait me faire :
14
13
12

cs_CanisLupus · Answer

Si tu n'as pas +sieurs enregs avec la même valeur :

set dateRS = DE.connection.execute("select nom from table")
do while not dateRS.EOF
Valeur=dateRS.fields("nom").value
dateRS.movenext
loop

ça devrait fonctionner, sinon :

set dateRS = DE.connection.execute("select nom from table group by nom")
do while not dateRS.EOF
Valeur=dateRS.fields("nom").value
dateRS.movenext
loop

Cordialement, CanisLupus

Tous les glands ne deviennent pas des chênes mais tous les chênes ont été des glands

foliop · Answer

les 2 ne marchent pas

cs_CanisLupus · Answer

Mince ! On navigue dans le schwartz là. Tu peux poster un bout de code pour m'éclairer ?
Au fait, Valeur c quoi ?

Cordialement, CanisLupus

Tous les glands ne deviennent pas des chênes mais tous les chênes ont été des glands

foliop · Answer

javais ecris Valeur=dateRS.fields(nom).value

ca marche mieux avec les "
merci a vous :)

Boucle qui fonctionne pas : help

24 réponses

Discussions similaires