Discussion :

[zOoOm_10]

j 3 table(produit,commande,commandedet) et j voudrais affiche les commande d'un produit dont la référence sera sectionner via un combobox.
mon problème c'est que a l'exécution j n'arrive a lire que la première commande de mon tableau commande( première ligne) et elle s'affiche sur mon datagrid pour les autres produit rien ne se produit

donc voila mon code:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
 
            strQuery = "SELECT * FROM llx_product  where ref='" & ComboBox1.Text & "'"
            strQuery1 = "SELECT * FROM  llx_commandedet"
            strQuery2 = "SELECT * FROM llx_commande"
            myCommand.Connection = conn
            myCommand1.Connection = conn1
            myCommand2.Connection = conn2
 
            myCommand.CommandText = strQuery
            myCommand1.CommandText = strQuery1
            myCommand2.CommandText = strQuery2
 
            dr = myCommand.ExecuteReader()
            dr1 = myCommand1.ExecuteReader()
            dr2 = myCommand2.ExecuteReader()
 
            DataGridView1.Rows.Clear()
            DataGridView1.ColumnCount = 6
            DataGridView1.Columns(0).Name = "référence"
            DataGridView1.Columns(1).Name = "date de commande"
            DataGridView1.Columns(2).Name = "réf client"
            DataGridView1.Columns(3).Name = "total_ht"
            DataGridView1.Columns(4).Name = "total_ttc"
            DataGridView1.Columns(5).Name = "date de livraison"
 
 
 
            While dr.Read()
 
                While dr1.Read()
                    While dr2.Read()
 
                        If (dr1(2) = dr(0) And dr2(0) = dr1(1)) Then
 
                            DataGridView1.Rows.Add(dr2(4), dr2(9), dr2(5), dr2(20), dr2(21), dr2(28))
 
                        End If
                    End While
End While
 
            End While

et merci

[mactwist69]

Pourquoi ne pas stocké le résultat de tes requêtes dans des datatables et lié tes datagridview a tes datatable ?

Les Datagridview ne sont pas très pratique pour manipuler les données. Et tu y verras beaucoup plus claire.

[zOoOm_10]

oui c vrai mais pour l'instant tous ce que je veux c'est de faire quelque chose de fonctionnel puisque j n manipule pas très bien le vb vu que c'est mon premier gros projet mais sinon ou se trouve l'erreur

[mactwist69]

Je crois que tu te trompes beaucoup (algo, logique, requete)

Il n'y a aucun lien entre tes trois requêtes... Alors que tes tables ont apparemment des liens (puisque dr2(0)=dr1(0))

Enfin... tu essais de faire un lien avec des dr0(0)=dr1(1).

Au lieu de faire UNE bonne requête avec jointure et condition... Tu fais trois requête indépendante.... et la tu essais de faire tes jointures...

Mais je t'assure que tes trois While imbriqués te retournera tout sauf ce que tu souhaites.

puisque tu ne veux que les informations: dr2(4), dr2(9), dr2(5), dr2(20), dr2(21), dr2(28) -> Donc dr2...

Essaie de créer une seule requête qui te retournera exactement ce que tu veux.

Apres... si tu ne veux pas faire de SQL ni de VB... très peu pour moi.

[zOoOm_10]

j bien essayé avec une seule requête mais sans succès alors que ca marche avec cette méthode (j fait le même travail pour la récupération de la fiche produit ) mais ici ca bloque il n'arrive a lire que la première ligne de mon tableau donc il me retourne le résultat d'un seul produit.

sinon j'aimerais bien manipuler toute les fonctionnalité du vb mais la je suis limité par le temps et en plus j aucune idée sur les datatable et comment les manipuler


mais merci tous de même pour la réponse

[mactwist69]

A ta place je me méfierai de cette méthode... Puisque tu dis toi même qu'elle marche mais qu'elle marche pas dans la même phrase.

Le choix est simple, on passe 10 minutes sur ta requêtes, ou 10 heures sur ton code, sans être sur que ça marche.


Si tu arrives a faire une seule requête.

Après ton code ressemblera a ça:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
strQuery = "MaSuperRequete  where ref='" & ComboBox1.Text & "'"
            myCommand.Connection = conn
 
            myCommand.CommandText = strQuery
 
            dr = myCommand.ExecuteReader()
 
            DataGridView1.Rows.Clear()
            DataGridView1.ColumnCount = 6
            DataGridView1.Columns(0).Name = "référence"
            DataGridView1.Columns(1).Name = "date de commande"
            DataGridView1.Columns(2).Name = "réf client"
            DataGridView1.Columns(3).Name = "total_ht"
            DataGridView1.Columns(4).Name = "total_ttc"
            DataGridView1.Columns(5).Name = "date de livraison"
 
 
             While dr.Read()
 
                   DataGridView1.Rows.Add(dr(0), dr(1), dr(2), dr(3), dr(4), dr(5))
 
            End While

Je veux bien t'aider... mais pour l'instant ton code n'est pas compréhensible car on ne connais pas tes tables, tes colonnes tes liens.... Donne des indications sur ta requête, on va la faire, et la vie sera tellement plus simple !