更新数据库时总是无法更新？

[yong1130]

mytable =me.dataset13.tables.item("name")
Try
row = mytable.NewRow
row.Item("序号") = Me.TextBox1.Text
row.Item("色系名称") = Me.TextBox2.Text
row.Item("客户色系") = Me.TextBox3.Text
row.Item("材质") = Me.TextBox4.Text
row.Item("规格") = Me.TextBox5.Text
row.Item("原料重量") = Me.TextBox6.Text
row.Item("备注") = Me.TextBox7
mytable.Rows.Add(row)
mytable.AcceptChanges()
Catch
MessageBox.Show(Err.Description, "err", MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try
try
me.oledbadapter.updater(me.dataset13.name.getchanges)
catch
MessageBox.Show(Err.Description, "err", MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try
这是我以上的代码，可是在添加时总是出错？

[donger2000]

mytable.AcceptChanges()
应该放在 me.oledbadapter.updater(me.dataset13.name.getchanges)之后，否则无法保存数据

[rock29]

donger2000(东东) 说对了

[minajo21]

mytable.AcceptChanges()

[menuvb]

我一般喜欢用数字来,
dim ds1 as dataset=new dataset
mytable =me.dataset13.tables.item(0)'当前表
Try
mytable.GetChanges()
Dim row As DataRow = mytable.Rows.Item(0)'当前行
row.Item("0") = Me.TextBox1.Text'序号

cmd = New OleDbCommandBuilder(adocmd)
adocmd.Update(ds1, "name")
catch
end try

我一般更新都是喜欢"update 表 set 字段='值'"来的,当然,用上面这个方法也可以更新.通过测试(VS200)