急求dataset更新数据库问题原因

[deerstalker]

Dim myComm As SqlCommandBuilder
myComm = New SqlCommandBuilder(Form_Main.DA)
Form_Main.DA.InsertCommand = myComm.GetInsertCommand
Form_Main.DA.DeleteCommand = myComm.GetDeleteCommand
Form_Main.DA.UpdateCommand = myComm.GetUpdateCommand

For Each target As DataRow In Form_Main.DS.Tables("abc").Rows
MsgBox(target(0) & "" & target(1) & "" & target(2) & "" & target(3) & "" & target(4) & "" & target(5))
Next

Form_Main.DA.Update(Form_Main.DS, "abc")
Form_Main.DS.Tables("abc").AcceptChanges()

form_main.DA和form_main.ds.table("abc“）在其他位置都运行正常，但是无法更新到数据库。最初我数据库的主键和table表不一致，但我更改位一致后仍无法更行，没有任何错误提示。中间一段msgbox显示table里面的数据一切正常。

[shoppo0505]

myComm.GetUpdateCommand贴出来，还有就是需要update的数据行也贴一下

[deerstalker]

Private Sub DGV_Cell_Info_CellValueChanged(sender As Object, e As DataGridViewCellEventArgs) Handles DGV_Cell_Info.CellValueChanged '更新DATASET '&&&&&&&&&&&&&& If mySignal = False Then Exit Sub '不是用户修改 End If For Each target As DataRow In Form_Main.DS.Tables("构件基本信息表").Rows If target(0) = DGV_Cell_Info.CurrentRow.Cells(0).Value Then '修改记录 target(11) = DGV_Cell_Info.CurrentCell.Value Exit For End If Next Form_Main.DS.Tables("构件基本信息表").AcceptChanges() Dim myComm As SqlCommandBuilder myComm = New SqlCommandBuilder(Form_Main.DA) Form_Main.DA.InsertCommand = myComm.GetInsertCommand Form_Main.DA.DeleteCommand = myComm.GetDeleteCommand Form_Main.DA.UpdateCommand = myComm.GetUpdateCommand Form_Main.DA.Update(Form_Main.DS, "构件基本信息表") Form_Main.DS.Tables("构件基本信息表").AcceptChanges() End Sub

[deerstalker]

引用 1 楼 shoppo0505 的回复:

myComm.GetUpdateCommand贴出来，还有就是需要update的数据行也贴一下

myComm.GetUpdateCommand后面还要跟语句？