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

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 : 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
        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