Discussion :

[debian54]

Bonjour,

Je dispose d’une table T_type, structure des champs :
Id_type ->num
Groupe -> texte
Categorie -> texte
clair_type -> texte
Photo -> texte

J’alimente une comboBox de la façon suivante :

Code :

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

1
2
3
4
5
6
7
8
9
10
'Alimentation de la liste de recherche categorie
dta = New OleDbDataAdapter(ObjetCommand)
'initialiser l'objet Command
ObjetCommand.Connection() = ObjetConnection
sql = "SELECT categorie FROM T_type GROUP BY catégorie ORDER BY categorie"
dta.Fill(dts, "L_categorie")
'Mettre dans un Objet DataTable une table du DataSet
l_categorie.DataSource = dts.Tables("L_categorie")
'Indiquer quelle colonne afficher
l_categorie.DisplayMember = "categorie"

Quand je lance la form, le conboBox m’affiche tous les enregistrements de la table, et ne fait pas de regroupement sur le champ catégorie. A priori, le « group by » n’est pas pris en compte.

Auriez-vous une idée, en vous remerciant par avance.
Cordialement.

[LuckyHal]

Bonjour,
Si j'ai compris tu veux mettre toutes les catégories dans ta combo...
Tu peux essayer select DISTINCT categorie from t_type order by categorie (plus besoin du group by) ce qui devrais te renvoyer toutes les valeurs uniques de catégorie...
En espérant t'avoir aider.

[Meylin]

Bonjour,

Je ne sais pas si ça vient de là (ou si c'est une erreur de frappe), mais il y a un accent sur "GROUP BY catégorie"

[debian54]

Aux deux réponses précédentes :
L'accent est une erreur de frappe, et n'est pas à l'origine du problème.
J'ai essayé aussi un

Code :

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

select distinct

, et le problème reste le même...
Cordialement

[sinople]

Hello,

Dans ton code, je ne vois pas a quel moment tu attribues ta requête SELECT (la variable sql) customisée dans ton DataAdapter. Ce qui pourrait expliquer pourquoi ce dernier utilise un comportement par défaut renvoyant tous les enregistrements dans ta datatable.

Tu trouveras un exemple dans la doc microsoft à l'adresse suivantes:

http://msdn.microsoft.com/fr-fr/libr...(v=vs.80).aspx

Plus particulièrement :

Code :

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

1
2
 Dim adapter As OleDbDataAdapter = _
        New OleDbDataAdapter(selectCommandString, connection)

Peut être que je me trompe car la mise en forme de ton code est un peu bancale

De manière plus générale, on utilise souvent une table spécifique pour stocker les catégories et une relation pour faire le lien entre la table enfant et la table parent (catégorie dans ce cas).

Puis dans le programme on utilise la table parent pour remplir le combobox et la selectedvalue est bindée sur la clé étrangère correspondante dans la table enfant.