Probléme d'insertion de la date dans la base access
Bonjour,
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
29
30
31
32
33
34
| Dim con As New OleDbConnection("provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=gmarche.mdb;")
Dim ds As New DataSet
Dim cmd As OleDbCommand = con.CreateCommand
Dim dr As OleDbDataReader
Dim db As New OleDbCommandBuilder
Dim da As New OleDbDataAdapter(cmd)
Dim dt As DataTable
Dim drow As DataRow
con.Open()
drow = ds.Tables("bc").NewRow()
drow("datt") = CStr(Date1.Text)
drow("objet") = CStr(T1.Text)
drow("montant") = CStr(T2.Text)
drow("ste_conslt") = CStr(T3.Text)
drow("titulaire") = CStr(T4.Text)
drow("date_visa") = CStr(DT1.Text)
drow("date_realis") = CStr(DT2.Text)
drow("obs") = CStr(T8.Text)
ds.Tables("bc").Rows.Add(drow)
'Pour modifier les valeurs changées dans le DataAdapter
db = New OleDbCommandBuilder(da)
'Mise à jour
da.Update(ds, "bc")
'On vide le DataSet et on le 'recharge' de nouveau.
ds.Clear()
MsgBox("Le bonde de commande est Enregistré")
con.Close() |
J'ai le probléme dans la ligne qui en rouge pendant l'insertion, le msg d'erreur est
Citation:
Column 'datt' does not belong to table bc.
Que je dois faire?
Merci de m'aider.
