Discussion :

[xargin]

Bonjour,
j'ai cette requette:

Code :

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

select Numero from Ligne_Commande as lc, PRODUIT as p where p.RefProd=lc.RefProd and Designation='" & desprod & "';"

quand je la teste avec sur access, pas de problème, il me renvoi le bon nombre de lignes, mais dans vba, quand j'affiche le contenu du recordset, il affiche chaque ligne 3 fois.
je ne comprend pas ce qui se passe.
merci de votre aide, pour résoudre ce problème.

[nico84]

bonjour,

Avec select distinct ça devrait supprimer les doublons
Par ailleurs si desprod contient une ' ça va bugguer

[xargin]

bonjour,

Avec select distinct ça devrait supprimer les doublons
Par ailleurs si desprod contient une ' ça va bugguer

Merci pour ta réponse, j'éditerais mon message demain, je suis plus au boulot^^

j'édite mon message pour dire que mon problème est toujours présent.

en fait, je ne vois pas comment créer ma requete.
je voudrais recuperer le numero de toutes les lignes qui ont la meme reference de produit.

je precise que le numero est cle primaire, et que la reference de produit est une cle etrangere.

[xargin]

j'ai trouvé peut être un debut de reponse, mais il m'affiche toujours des doublons, je ne sais pas pourquoi.

voici ma requete modifiee:

Code :

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

select distinct Numero from Ligne_Commande as lc, PRODUIT as p where p.RefProd = lc.RefProd and Designation='" & desprod & "' order by Numero;

[Tierisa]

il faut peut etre regrouper les reponses

Code :

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

SELECT DISTINCT Numero FROM Ligne_Commande AS lc, PRODUIT AS p GROUP BY Numero, [p].[RefProd], [Designation] HAVING ((([p].[RefProd])=[lc].[RefProd]) AND (([Designation])='" & desprod & "'));

La fin du code n'est peut etre pas bonne avec 'desprod' mais c'est un truc de ce style

[xargin]

merci pour ta reponse, Tierisa, mais, j ai une erreur d execution.
Il me dit que tous ce qui est dans le HAVING doit etre dans le group by

j ai corrige ta requete, en fait, tu avais oublie de mettre un where, et ca ne fonctionne toujours pas.

[Tierisa]

s'il y a "having" il ne doit pas y avoir "where". Le mieux que je te propose c'est de creer ta réquete à l'aide du createur de requete de access. Mets également le regroupement et lance la. Attention il faudra que tu mettes un critere directement à la place de 'desprod' mais c'est juste pour essayer. Si cela fonctionne, passe en mode sql et recupère le code.