Bonjours
Voici le code relatif a l'enregistrement de mes donnees du dataset vers la base de donnees
mais ceci me genere l'erreur gere au niveau du boucle try.
Avec Materiels, mon dataset et employe, le nom de la table.
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 Dim MaterialTableAdapter = New Pc_ManagementDataSetTableAdapters.MaterialsTableAdapter Dim Materiels = New Pc_ManagementDataSet Try If Materiels.HasChanges Then If MessageBox.Show("Are you sure you want to save changes?", "Confirmation of registration", MessageBoxButtons.OKCancel, MessageBoxIcon.Question) = Windows.Forms.DialogResult.OK Then MaterialTableAdapter.Update(Materiels.employe) Else Materiels.RejectChanges() End If End If Catch ex As Exception MessageBox.Show("An error occured when updating", "Error of update") End Try
Partager