Probleme avec une requete SQL en VB6 HELP

Question

Salut, j'ai un probleme avec une requete SQL. En fait dans un premier combobox on selectionne une categorie et dans un deuxieme combobox apparaissent les produits de la cat&#233;gorie correspondante. Le probleme c'est que j'ai 10 fois chaque resultat qui s'affiche a chaque fois .Pas moyen de trouver l'erreur je m'en remet a vos lumieres .

Dim x As String
x = Trim(Combo2.Text)   'contient la categorie
Combo3.Clear
produit.MoveFirst
requete = "SELECT Produit.libell&#233;,Produit.[date achat],Produit.categorie,Categorie.categorie FROM Produit,Categorie WHERE Produit.categorie  LIKE '" + x + "' ORDER BY produit.[date achat] "
Set resultatcmb1 = base.OpenRecordset(requete)

Dim o%
Dim x%
Combo1.Clear
Combo3.Clear
o = resultatcmb1.RecordCount
If o <> 0 Then
    resultatcmb1.MoveFirst
    Do While Not resultatcmb1.EOF = True
        Combo3.AddItem Trim(resultatcmb1.Fields(1)) + Chr(Asc(" ")) + Chr(Asc(" ")) + Chr(Asc(" ")) + Trim(resultatcmb1.Fields(5))
        resultatcmb1.MoveNext
    Loop
End If

C&#233;sar

omsylv · Answer

Salut, 



Si j'ai bien compris ta requ&#234;te, tu s&#233;lectionne tous les produits
achet&#233; &#224; la [date achat] et correspondant &#224; la cat&#233;gorie x. Donc si tu
as 5 fois le m&#234;me produit achet&#233; le m&#234;me jour, il apparaitra 5 fois
dans le r&#233;sultat de ta requ&#234;te. 



Peut &#234;tre faut il essay&#233; de grouper en plus par nom de produit ?

cs_ivory59 · Answer

Je vais essayer de revoir ma requete pour voir si ca peut marcher

C&#233;sar

cs_ivory59 · Answer

Je vais essayer de revoir ma requete pour voir si ca peut marcher

C&#233;sar

cs_ivory59 · Answer

En fait je viens de me rendre compte que categorie.categorie ne servait a rien je l'ai enlev&#233; et comme par magie plus d'erreur
je n'y comprend rien mais je suis heureux que ca marche merci pour tn aide omsylv @+

C&#233;sar

omsylv · Answer

Et ben content de voir que tu as trouv&#233;. Ceci dit, tu devrais accepter
ta solution comme &#231;a si d'autres recherchent la m&#234;me chose que toi il
sauront qu'une r&#233;ponse &#224; &#233;t&#233; apport&#233;e



A un de ces 4

Probleme avec une requete SQL en VB6 HELP

5 réponses

Discussions similaires