Discussion :

[superthx]

Bonjour,

J'essai d'alimenter 2 combobox avec mysql.
J'ai une table produit avec id, produit, type

id|produit|type
--------------
1|Fruit|Pomme
2|Fruit|Orange
3|Fruit|Banane
4|Viande|Steack
5|Viande|Veau

Produit est dans combobox1 et type combobox2. Jusqu'ici pas de problème.
Mais j'arrive pas dans mon exemple que lorsque je choisi Fruit, qu'il ne m'affiche que les Fruits et non le reste.
Aussi vu que j'ai plusieurs Fruit et Viande au lieu qu'il ne m'affiche 3 Fruit et 2 Viande qu'il ne m'affiche que un seul de chaque.

Merci de votre aide. Sa me ferai super avancer dans mon projet....

[LeCygne]

Bonjour,

Ca aurait été sympa de nous mettre ton code histoire qu'on puisse voir à peu près ou tu en es.

J'ai une remarque au sujet du nom de tes colonnes, parce que là, je bondit au plafond en voyant une colonne qui porte le nom de la table . Dès que cela arrive, il faut immédiatement se poser des questions. Si cet abus de langage ne pose pas de problème dans le langage courant, il peut conduire à des incompréhensions en informatique. Aussi, je te recommande les noms de colonne suivant : Id, Categorie, Designation

Sans savoir précisément comment ton programme est architecturé, j'imagine qu'une fois que le produit est choisi, il faut exécuter la requête suivante :

Code :

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

1
2
3
SELECT id, produit, type
FROM produit 
WHERE produit = contenu de ma comboBox1

Avec mes noms de colonne :

Code :

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

1
2
3
SELECT Id, Categorie, Designation
FROM produit 
WHERE Categorie = contenu de ma comboBox1

Cela te ramènera la liste des produits que tu attends et qu'il ne te restera plus qu'à afficher.

[superthx]

Bonjour,

Ca aurait été sympa de nous mettre ton code histoire qu'on puisse voir à peu près ou tu en es.

J'ai une remarque au sujet du nom de tes colonnes, parce que là, je bondit au plafond en voyant une colonne qui porte le nom de la table . Dès que cela arrive, il faut immédiatement se poser des questions. Si cet abus de langage ne pose pas de problème dans le langage courant, il peut conduire à des incompréhensions en informatique. Aussi, je te recommande les noms de colonne suivant : Id, Categorie, Designation

Sans savoir précisément comment ton programme est architecturé, j'imagine qu'une fois que le produit est choisi, il faut exécuter la requête suivante :

Code :

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

1
2
3
SELECT id, produit, type
FROM produit 
WHERE produit = contenu de ma comboBox1

Avec mes noms de colonne :

Code :

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

1
2
3
SELECT Id, Categorie, Designation
FROM produit 
WHERE Categorie = contenu de ma comboBox1

Cela te ramènera la liste des produits que tu attends et qu'il ne te restera plus qu'à afficher.

Malheureusement cela ne marche pas..... C'est la raison pour laquel je suis ici. Je laisse le code pour vérifier.
En mettant '" & ComboBox2.Text & "' cela ne fonctionne pas, par contre si je met Fuit ou Viande c'est Ok......
Qu'est-ce que je fais mal ?

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
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
Imports MySql.Data.MySqlClient
Public Class test
    Dim MysqlConn As MySqlConnection
    Dim COMMAND As MySqlCommand
    Dim READER As MySqlDataReader
 
 
    Private Sub test_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        MysqlConn = New MySqlConnection
        MysqlConn.ConnectionString =
            "server=192.168.1.10;userid=x;password=x;database=xCantera"
        Dim READER As MySqlDataReader
 
        Try
            MysqlConn.Open()
            Dim Query As String
            Query = "select * from xCantera.Produit"
            COMMAND = New MySqlCommand(Query, MysqlConn)
            READER = COMMAND.ExecuteReader
            While READER.Read
                Dim sproduit = READER.GetString("produit")
                ComboBox2.Items.Add(sproduit)
            End While
 
        Catch ex As Exception
            MessageBox.Show(ex.Message)
        Finally
            MysqlConn.Dispose()
        End Try
 
 
        Try
            MysqlConn.Open()
            Dim Query As String
            Query = "select id, produit, type from xCantera.Produit WHERE produit = '" & ComboBox2.Text & "'"
            COMMAND = New MySqlCommand(Query, MysqlConn)
            READER = COMMAND.ExecuteReader
            While READER.Read
                Dim stype = READER.GetString("type")
                ComboBox1.Items.Add(stype)
            End While
 
        Catch ex As Exception
            MessageBox.Show(ex.Message)
        Finally
            MysqlConn.Dispose()
        End Try
 
    End Sub
 
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
 
 
    End Sub
 
 
End Class

[Prisson]

Bonjour,
pourquoi n'essayerais tu pas avec 'combobox2.selectedText'

Maintenant pour obtenir le resultat desiré, tout dependra de l'evènement auquel ton code est abonné.
ce que tu devrais peut-etre indiqué.

[superthx]

Bonjour,
pourquoi n'essayerais tu pas avec 'combobox2.selectedText'

Maintenant pour obtenir le resultat desiré, tout dependra de l'evènement auquel ton code est abonné.
ce que tu devrais peut-etre indiqué.

Merci de repondre, j'ai changé

Code :

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

Query = "select id, produit, type from xCantera.Produit WHERE produit = '" & ComboBox2.Text & "'"

par

Code :

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

Query = "select id, produit, type from xCantera.Produit WHERE produit = '" & ComboBox2.SelectedText & "'"

Mais sa donne toujours rien. Une autre soluce ????