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

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!


-------------------------------
Réponse au message :
-------------------------------

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

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


-------------------------------
Réponse au message :
-------------------------------


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!


-------------------------------
Réponse au message :
-------------------------------

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

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é

-------------------------------
Réponse au message :
-------------------------------

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


-------------------------------
Réponse au message :
-------------------------------


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!


-------------------------------
Réponse au message :
-------------------------------

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