Discussion :

[G.D.O]

Bonjour,

voici mon code :

rsNom.open"SELECT Composant, Qte_Fabric FROM Nomenclatures WHERE Compose = '"& refArt &"'", conn

Do while Not rsNom.eof

refComp = rsNom("Composant")
rsStocks.open"SELECT Lieu_stk, Emplact, Quantite FROM '(l.50)
STOCKS WHERE Article = '"& refComp &"'", conn '(l.50)

Do while Not rsStocks.eof

%>

(code html d'affichage)

<%

rsStocks.movenext
Loop

rsNom.movenext
Loop

%>

et voici mon message d'erreur :

ADODB.Recordset error '800a0e79'

Cette opération n'est pas autorisée si l'objet est ouvert.

/glh/SortieSurOfs_b.asp, line 50

L'erreur est donc située au niveau de "rsStocks" car je l'ouvre une 2ème fois à partir de la 2ème boucle de "rsNom".

J'ai donc mis "rsStocks.close" avant la l.50 mais là il me met : "Cette opération n'est pas autorisée si l'objet est fermé".

En gros que rsStocks soit ouvert ou fermé l'opération n'est pas autorisée

Quelqu'un pourrait-il me filer un coup d'main svp?

[dl_jarod]

tu pourrais simplement lui donner un autre nom lors de la deuxième ouverture, genre rsStocks2... Je ne dis pas que c'est LA solution mais c'est peut-être une piste à suivre...

[G.D.O]

C'est bon j'ai trouvé. Il suffisait de mettre rsStocks.close apres le loop de la boucle de rsStocks.

Visiblement le fait que rsStocks.Open soit directement précédé rsStocks.close posait un problème. J'avais déjà eu un bug similaire en VB6 sur une autre BD : le PC éxécute le code "trop" vite et de ce fait créée des erreurs. Ce type d'erreurs est apparemment assez fréquent sur l'exploitation des bases de données (en tout cas assez fréquent chez moi ).

Merci quand même Jarod.

@ +++