Probleme combobox access vb.net
bonjour!!
j'ai un probleme et je ne sais pas ce qui se passe....
je créé une bd access avec 2 tables:
-table ZONE (Zone_num,Zone_libelle)
-table EMPLACEMENT(EMPLACEMENT_num,EMPLACEMENT_libelle)
voilà mon code pr remplir le combo avec la table ZONE
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
| Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Init.Initialiser()
Dim ChaineSql As String
ChaineSql = "SELECT zone_libelle " & _
"FROM zone "
Dim Commande As New System.Data.OleDb.OleDbCommand
With Commande
.CommandText = ChaineSql
.CommandType = CommandType.Text
.Connection = maConnexion
End With
Dim Reader As System.Data.OleDb.OleDbDataReader
Reader = Commande.ExecuteReader()
ComboBox2.Items.Clear()
If Reader.HasRows Then
While Reader.Read()
ComboBox2.Items.Add(Reader.GetValue(0))
End While
End If
End Sub |
et voilà mon message d'erreur :
Echec IERRORINFO.GetDescription avec E_FAIL(0x80004005).
Alors quand utilisant la meme procédure pour remplir le combo avec la table EMPLACEMENT cela marche....
je comprends pas trop ce qui se passe,est ce que VB n'acepte pas "ZONE"...?