这是我的代码
Private Sub ButtonEdit_Click(sender As Object, e As EventArgs) Handles ButtonEdit.Click
Dim cb As New OleDb.OleDbCommandBuilder(da)
cb.QuotePrefix = "["
cb.QuoteSuffix = "]"
ds.Tables("ProductDatabase").Rows(inc).Item("BARCODE") = TextBoxBarcode.Text
ds.Tables("ProductDatabase").Rows(inc).Item("PRODUCT NAME") = TextBoxProductName.Text
ds.Tables("ProductDatabase").Rows(inc).Item("PRINCIPAL") = TextBoxPrincipal.Text
ds.Tables("ProductDatabase").Rows(inc).Item("BUYING PRICE") = TextBoxBuying.Text
ds.Tables("ProductDatabase").Rows(inc).Item("SELLING PRICE") = TextBoxSelling.Text
da.Update(ds, "ProductDatabase")
MsgBox("Data successfully edited.")
然后显示此消息:
不支持UpdateCommand的动态SQL生成 一个不返回任何键列信息的SelectCommand
和高亮部分是
da.Update(ds, "ProductDatabase")
答案 0 :(得分:0)
假设BARCODE实际上是您正在编辑的表的主键,请尝试将[和]放在两个单词字段名称中,例如“[PRODUCT NAME]”。