[VB.NET] Mise a jour dataset et commandbuilder
Voici le petit bout de code lorsque l'on presse le bouton' enregistrer' du form
le but , si c'est un nouveau record, j'ajoute un ligne sinon , j'édites le record courant.
mais je recois un message me disant
Citation:
La conversion de la chaîne "note" en type 'Integer' n'est pas valide.
Quelqu'un peut m'expliquer le pourquoi, ou alors j'ai raté un épisode quelque part
Merci
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
| If Ajout = True Then
DsCalendar.Tables("notes").NewRow()
Else
Me.BsNotes.Position = RecordCourant
End If
Me.BsNotes("note") = Me.TxtNote
Me.BsNotes("dtpicker") = Me.DTPicker
Me.BsNotes("Producteur") = Me.CbProducteur
Me.BsNotes("type") = Me.CbType
Me.BsNotes("txtheure") = My.Computer.Clock.LocalTime
Me.BsNotes("ordinateur") = My.Computer.Name
Me.BsNotes("DateEncodage") = DateString
DsCalendar.Tables("notes").Rows.Add(BsNotes)
'Pour modifier les valeurs changées dans le DataAdapter
OcBuilder = New OleDbCommandBuilder(DaCalendar)
'Mise à jour
DaCalendar.Update(DsCalendar, "notes")
Ajout = False |
