Discussion :

[juju05]

Bonjour,

Je souhaite récupérer des données par l'intermédiaire d'un recordset. Pour cela, j'ai codé :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 rsRecords_achat.Open "select b.reference, b.designation, b.id_besoin, (b.qte_total_besoin - nvl(tmp.total,0) - nvl(b.qte_tot_reserve,0)) as tot_besoin from toperp.t_besoin b " _
                                     & " inner join t_article a on b.id_article = a.id_article inner join topmes.wo_material wm on wm.id_wo_material = b.id_besoin_org inner join topmes.wo w " _
                                     & " on wm.id_wo = w.id_wo left outer join (select bi.id_besoin, sum(bi.qte_tot_reserve) As total from toperp.t_besoin_stock_in bi group by bi.id_besoin) tmp on b.id_besoin = tmp.id_besoin " _
                                     & " where b.id_besoin_org = " & rsRecord_res.Fields("id_wo_instruction").Value, conn, adOpenForwardOnly, adLockReadOnly
 
 If conn.State = adStateOpen Then                                
 
If Not rsRecords_achat.EOF Then

Ma requête ne restitue rien en vba. En collant la requête sous SQLDEVELOPPER, j'obtiens un résultat. Je ne vois pas d'où peut venir mon problème dans le curseur.

[Invité]

Bonjour,
hormis que tu test la connexion après l’exécution de ta requête, je ne voie pas de problème en soit.

as tu testé ta requête sans la close where!

quand et comment est généré rsRecord_res.Fields("id_wo_instruction").Value?

pour la valeur de rsRecord_res.Fields("id_wo_instruction").Value que dit SQLDEVELOPPER?

tu fais des lien droit (inner join) ta clé se trouve bien dan toutes tes table? (Left Join)?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
while rsRecords_achat.EOF=false
  ActiveCell=rsRecords_achat(0).value
  rsRecords_achat.movenext
wend

[juju05]

SQLDEVELOPPER restitue des données pour la valeur de wo_instruction que le curseur précédent a restitué.

J'ai l'impression que mon curseur est mal codé. Ne manque t-il pas des guillemets à la fin ?

[Invité]

Bonjour,
envois ton script dans la fenetre d execution debug.print sql et colle le resultat dans sqldeveloppeur