phenX
Messages postés704Date d'inscriptionmercredi 4 mai 2005StatutMembreDernière intervention28 août 2012
-
6 juin 2006 à 14:51
phenX
Messages postés704Date d'inscriptionmercredi 4 mai 2005StatutMembreDernière intervention28 août 2012
-
21 juin 2006 à 11:41
comment fait on pour remplir un combobox avec les données d'une entité d'une table acess2003 en VBNET?
Icarius44
Messages postés51Date d'inscriptiondimanche 29 mai 2005StatutMembreDernière intervention16 mars 20091 21 juin 2006 à 11:16
Voila comment faire en .net 2005
'CBVariete est ma comboBox
dim maConnect As ADODB.Connection = New ADODB.Connection
Dim maChaineConnect As String
Try
maConnect = New ADODB.Connection
maChaineConnect = "C:\mabase.mdb"
maConnect.Provider = "Microsoft.Jet.OLEDB.4.0"
maConnect.ConnectionString = maChaineConnect
maConnect.Open()
Catch ex As Exception
MsgBox("Connexion Impossible!!" + vbNewLine + ex.Message, MsgBoxStyle.Critical)
End Try
dim rs as ADODB.RecordSet
rs = maConnect.Execute("SELECT V.NumVariete as Num, V.NomVariete as Nom FROM VARIETE V ORDER BY NomVariete")
While Not rs.EOF
CBVariete.Items.Add( rs.Fields("Nom").Value.ToString)
rs.MoveNext()
End While