[vb.net] datagridview+exécution de requete MYsql

Version imprimable

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:

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 :D

24/03/2010, 11h28
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.
24/03/2010, 11h36
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 :?
24/03/2010, 11h51
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.
24/03/2010, 12h15
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:oops:

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

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:

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 ! :ccool:

voici un code qui s'exécute parfaitement pour l'affichage d'une fiche produit :

Code:

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
 strQuery = "SELECT * FROM llx_product  where ref='" & ComboBox1.Text & "'"
            strQuery1 = "SELECT * FROM llx_product_stock "
 
            myCommand.Connection = conn
            myCommand1.Connection = conn1
 
 
            myCommand.CommandText = strQuery
            myCommand1.CommandText = strQuery1
 
          dr = myCommand.ExecuteReader()
            dr1 = myCommand1.ExecuteReader()
 
           Dim  DataTable dt = New DataTable 
 
            DataGridView1.Rows.Clear()
            DataGridView1.Columns(0).Name = "Id"
            DataGridView1.Columns(1).Name = "référence"
            DataGridView1.Columns(2).Name = "Label"
            DataGridView1.Columns(3).Name = "Prix"
            DataGridView1.Columns(4).Name = "qte"
            DataGridView1.Columns(5).Name = "emplacement"
 
 
            While dr.Read()
 
                While dr1.Read()
                     While dr2.Read()
 
 
                    If (dr1(2) = dr(0)) Then
 
 
                        DataGridView1.Rows.Add(dr(0), dr(3), dr(4), dr(7), dr1(4)) 
 
                    End If
                End While
 
 
            End While

dans cette exemple a chaque ref selectionné dans ma combo une fiche produit s'affiche dans le datagrid

sinon voila les 3 tables

produit(rowid,datetc,tms,ref,label,..............................)
commandedet(rowid,fk_product,fk_commande,.............)
commande(rowid,ref,refclient,datecommande,................)

pour relié mes 3 tables je compare le fk_product et fk_commande par rapport au rowid des 2 autres tables pour faire la jointure et bien sur le produit.ref par rapport au contenu de mon combobox mais ici j'arrive a obtenir qu'une seul commande d'un seul produit dans l'index et celui de la premiere ligne de ma table commande pour les autres j rien

24/03/2010, 14h07
zOoOm_10

j trouvé la solution :mrgreen: j vais essayer de travailler avec les datatable maintenant :ccool: