Bonjour,
ça fait deux jours que je tourne en rond sur un problème avec une base de données Acces
J'utilise un dataset pour insérer un nouvel enregistrement dans la base de données. La nouvelle ligne n'est pas créée dans Access. Voici le code pour me connecter à la base de données :
Voici le code qui appelle la fonction de connection à la BD ainsi que la création de la nouvelle ligne d'enregistrement et la tentative pour l'injecter dans la base de données :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 Dim path_bd As String path_bd = Application.StartupPath objetconnection=NewOleDb.OleDbConnection "Provider=Microsoft.ace.oledb.12.0; Data Source =" + path_bd + "\Resources\Fonds.accdb") objetconnection.Open() objetcommand = New OleDb.OleDbCommand(commande_sql) objetadaptater = New OleDb.OleDbDataAdapter(objetcommand) objetcommand.Connection() = objetconnection objetdataset = New DataSet() objetadaptater.Fill(objetdataset, nom_table) objetdatatable = objetdataset.Tables(nom_table)
Lorsque j'analyse au pas à pas l'exécution du code, le programme semble exécuter la commande update mais lorsque je consulte la base de données il n'y pas de nouvel enregistrement.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 objetdatarow = objetdataset.Tables("Encodage").NewRow() objetdatarow("Commentaires") = label1.text objetdatarow("Trimestre") = label2.text objetdataset.Tables("Encodage").Rows.Add(objetdatarow) objetcommandbuilder = New OleDb.OleDbCommandBuilder(objetadaptater) objetadaptater.Update(objetdataset, "Encodage")
La procédure de connection fonctionne bien car je l'utilise pour remplir des combobox....
j'ai pourtant suivi à la lettre les instructions dans le cours de plasserre.....
d'avance merci pour vos réponses
Madfox48
Partager