Bonjour ,
J'ai une base de données sous SQL server (.mdf) , avec 3 tables .
Dans mon applications , j'ai fait une partie "administration" . Ou , l'admin auras accés aux datagridview des 3 tables pour modifier des valeurs .
j'ai reussit à ajouter une valeurs a partir du datagridview et l'enregistrer dans la base de données . Mais je n'arrive pas a faire une mise à jour d'un champs ou encore supprimer une ligne . Dans ma "fenetre d'execution" j'ai ce méssage :
Voici mon code qui se trouve lorsque je clic sur la petit icone ( avec une disquette ) pour sauvergarder les modif. dans la BDD :
Code : Sélectionner tout - Visualiser dans une fenêtre à part Une exception de première chance de type 'System.InvalidOperationException' s'est produite dans System.Data.dll
Merci d'avance .
Code : Sélectionner tout - Visualiser dans une fenêtre à part
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
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43 Private Sub ListeDonnéesBindingNavigatorSaveItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListeDonnéesBindingNavigatorSaveItem.Click 'Si c'est la table ListeDonnées qui est affiché , on l'enregistre If ListeDonnéesDataGridView.Visible = True Then Try 'Commandes qui permet la mise a jour de la base de donnée 'Via le datagridView Me.Validate() Me.ListeDonnéesBindingSource.EndEdit() Me.ListeDonnéesTableAdapter.Update(Me.GdocDataSet.ListeDonnées) MsgBox("la mise à jour à réussit") Catch ex As Exception MsgBox("la mise à jour a échoué") End Try 'Si c'est le datagrid de la table parametres qui est affiché ElseIf TbparametresDataGridView.Visible = True Then Try Me.Validate() Me.TbparametresBindingSource.EndEdit() Me.TbparametresTableAdapter.Update(Me.GdocDataSet.tbparametres) MsgBox("la mise à jour à réussit") Catch ex As Exception MsgBox("la mise à jour a échoué") End Try ElseIf DataDataGridView.Visible = True Then Try Me.Validate() Me.DataBindingSource.EndEdit() Me.DataTableAdapter.Update(Me.GdocDataSet.data) MsgBox("la mise à jour à réussit") Catch ex As Exception MsgBox("la mise à jour a échoué") End Try End If 'Me.TableAdapterManager.UpdateAll(Me.GdocDataSet) End Sub
Partager