Afficher deux champs dans un comboBox

Bonjour, depuis plusieurs jours j'essaye d'afficher deux champs SQL dans ma liste déroulante mais en vain !
Voici mon code:

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Req = "Select NoOrdinateur,NomOrdinateur,NomSalaries,PrénomSalaries from Ordinateur O,Salaries S Where O.NoSalaries = S.NoSalaries; "   CmdOrdi = New OleDbDataAdapter(Req, Cnx) ' prépare l'extraction de données CmdOrdi.Fill(JddOrdi) ' et remplissage de la liste déroulante Me.LstOrdinateur.Items.Add("Todos los Ordenadores") For Each UnOrdi In JddOrdi.Rows Me.LstOrdinateur.Items.Add(UnOrdi.Item("NomOrdinateur")) 'Je souhaite aussi afficher le champs "NomSalaries"   Next UnOrdi Me.LstOrdinateur.SelectedIndex = 0

---

Seul le nom ordinateur s'affiche dans ma liste déroulante mais je n'ai toujours pas reussi à afficher le champs NomSalaries.
Savez vous comment faire ?

Merci d'avance,
Blito

Bonjour,
petite question:
JddOrdi c'est de type datatable? si oui comment tu l'a remplis

sinon

Tu Rajoute l'autre champ comme ca:

Code:

---

Me.LstOrdinateur.Items.Add(UnOrdi.Item("NomOrdinateur") & " " & UnOrdi.Item("NomSalaries"))

---

si ca marchera pas, je propose que tu utilise DataReader:

Code:

---

1 2 3 4 5 6 7 8 9 10

conn() Dim dr As SqlDataReader Dim com1 As New SqlCommand("SELECT .......", con) ComboBox1.Items.Clear() dr = com1.ExecuteReader While dr.Read ComboBox1.Items.Add(dr(0) & " " & dr(1)) End While dr.Close() disconn()

---

Merci beaucoup pour ton aide ! :ccool:
Le premier code que tu m'as donné fonctionne très bien, je cherchais beaucoup trop compliqué alors que la réponse était toute simple .

Salut,

La requête étant libellée comme ceci,

Code:

---

Req = "Select NoOrdinateur,NomOrdinateur,NomSalaries,PrénomSalaries from Ordinateur O,Salaries S Where O.NoSalaries = S.NoSalaries; "

---

Si l'on doit utiliser un DataReader, je pense que le code sera comme ça:

Code:

---

1 2 3 4

While dr.Read ComboBox1.Items.Add(dr(1) & " " & dr(2)) End While

---

Car NomOrdinateur est à l'indice 1 et NomSalaries est à l'indice 2. Ou alors on conserve ton code, mais on modifie la requete comme suit

Code:

---

Req = "Select NomOrdinateur,NomSalaries,PrénomSalaries from Ordinateur O,Salaries S Where O.NoSalaries = S.NoSalaries;

---