Dim db = HySql.DataBaseFactory.CreateDatabase("db_jxcms")
MsgBox(1)
Dim dt As DataTable = e.Form.Controls("Table1").Table.DataTable
MsgBox(2)
'Dim dt As DataTable = e.Form.Controls("MYSQL-01_Table1").Table.DataTable
Dim dtb As System.Data.DataTable = dt.basetable.Copy '为了去掉添加的临时列，需要使用复制的表
MsgBox(3)
dtb.Columns.Remove("_Locked") '去掉临时列，这个列在绑定Foxtable的table.DataSource后就会自动添加
'Dim res = db.UpdateDataTable(dtb, "PERSON.db01")
MsgBox(4)
Dim res = db.UpdateDataTable(dtb, "tb_sell_main")
MsgBox(5)
dt.AcceptChanges()
MsgBox(6)
msgbox(res)
有时新增后，保存，就报错下面的错。有时修改，保存，就报错下面的错。MsgBox(5)
对于不返回任何键列信息的 SelectCommand，不支持 UpdateCommand 的动态 SQL 生成。
加好友 
发短信
Post By：2023/4/19 10:05:00 [显示全部帖子]
此主题相关图片如下：mysql-保存.jpg
