数据UPDATE的问题,各位朋友帮忙看一下!
更新数据时出现下面错误提示:
“对于不返回任何键列信息的 selectcommand 不支持 updatecommand 的动态SQL生成”
代码如下:
Dim changeds As New DataSet()
changeds = oledbds.GetChanges
If Not changeds Is Nothing Then
MsgBox(changeds.GetXml, MsgBoxStyle.Information, "DATA Change is :")
End If
Dim combuilder As New OleDbCommandBuilder(oledbda)
Try
oledbda.Update(oledbds.Tables("mat_inout")) ‘执行到这句出错
Catch err As OleDbException
MsgBox(err.Message)
Catch err2 As Exception
MsgBox(err2.Message)
End Try
各位高手帮忙看一下,哪里的问题 ?