Urgent:PB pour boucler sur des requetes!!

Messages postés
12
Date d'inscription
vendredi 9 août 2002
Statut
Membre
Dernière intervention
10 juillet 2003
-
Messages postés
28
Date d'inscription
samedi 28 octobre 2000
Statut
Membre
Dernière intervention
13 septembre 2002
-
Je soouhaite réaliser une boucle sur une requête...
comment faire??

Voila ce que je fais:

Dim rst as New ADODB.Recordset

for i = 0 to 50
tempo=i
rst.Open "INSERT table(colonne) VALUES('" & tempo & "')"
next i

VB me le fait bien pour le premier mais après il me dit qu'il:
Run-time error '3705'
The operation requested by the application is not allowed if the objet is open

SInon...si je fais un rst.Close après ma requête
il me fait le même message mais avec close à la fin..

HELP!!!!!!!SVP!!!

monsnow

3 réponses

Messages postés
28
Date d'inscription
samedi 28 octobre 2000
Statut
Membre
Dernière intervention
13 septembre 2002

salut,

essayes de la maniere suivante:

for i = 0 to 50
CurrentDb.Excute ("insert into table(colonne) select " & i & ";")
next i

je pense que ca devrait marcher!
Messages postés
12
Date d'inscription
vendredi 9 août 2002
Statut
Membre
Dernière intervention
10 juillet 2003

ok..je vais essayer..
mais si je veux aire une boucle sur des requetes SELECT..
comment je fais pour récupérer les valeurs...
merci kFAR

monsnow
Messages postés
28
Date d'inscription
samedi 28 octobre 2000
Statut
Membre
Dernière intervention
13 septembre 2002

pour les boucles sur des requetes select :

Dim valeur(50) As Object

For i = 1 To 50
Set valeur(i) = CurrentDb.Openrecordset("select champ1 from table where champ2=" & i & ";")
Next i

et apres tu recuperes les valeurs dans valeur(i).fields("champ1")

voila, j'espere t'avoir aidé