为什么我更新保存不了数据呢.

[shsmhq]

'保存更新。
Dim num As Integer
'停止当前的任务编辑
Me.BindingContext(Dataset1, "table1").EndCurrentEdit()
'获取dataset 中更改的内容
Dim chgobj As New DataTable
chgobj = CType(Dataset1.Tables("table1").GetChanges, DataTable)
If Not chgobj Is Nothing Then
If Sqldbconn1.State = 0 Then Sqldbconn1.Open()
Sqladapter1.ContinueUpdateOnError = True
Try
num = Sqladapter1.Update(chgobj)
Dataset1.Merge(chgobj)
Dataset1.AcceptChanges()
Catch ex As Exception
System.Windows.Forms.MessageBox.Show(ex.Message)
End Try
Sqldbconn1.Close()
End If

[lang_csdn]

我一般没有这样写更新，都是自己写的语句，帮你顶上去！

你设置了UpdateCommand了吗？UpdateCommand对象的CommandText语句设置正确吗？

这些检查一下！

[shsmhq]

好了搞定了.

[shsmhq]

'保存更新。

'停止当前的任务编辑
Me.BindingContext(Dataset1, "table1").EndCurrentEdit()
'获取dataset 中更改的内容
Dim chgobj As New DataTable
chgobj = CType(Dataset1.Tables("table1").GetChanges, DataTable)
If Not chgobj Is Nothing Then
If Sqldbconn1.State = 0 Then Sqldbconn1.Open()
Sqladapter1.ContinueUpdateOnError = True
Try
Sqladapter1.Update(chgobj)


Catch ex As Exception
System.Windows.Forms.MessageBox.Show(ex.Message)
End Try
Dataset1.Tables("table1").clear
Sqladapter1.fill(dataset1,"table1")

Sqldbconn1.Close()
End If

这是正确的.

[Redsun248]

我正试

[Redsun248]

你这个有点缺点，就是当行里面有空值时不能保存，这个是不行的，当如果有些值不能确定必须为空就不好弄了