Ajout dans un combobox a partir d'une base de données
salut, j'ai un problème au niveau de mon application plus précisément je veux que le combobox contient les données enregistrées au niveau de ma base de données (dans mon cas c'est oracle)
voici mon code
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
| Private Sub Véhicule_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim XE As String = "dsn=XE;uid=SYSTEM;pwd=system;"
Dim cn As New OdbcConnection(XE)
cn.Open()
Dim cmd As New OdbcCommand
cmd.Connection = cn
cmd.CommandText = "select code_energie from energie "
cmd.CommandType = CommandType.Text
'mon combobox est nommé tb_energie
Me.tb_energie.Items.Add(cmd.CommandType)
End Sub |