易语言修改ACCESS数据库，修改失败，大神看看是不是语句...

lisiming · 发表于 2023-9-28 18:25:12

子程序名	返回值类型	公开	备注
_按钮_SAVE_被单击

如果真 (信息框 (“请确认一下是否修改无误？”, 1, ) ＝ #取消钮 )

返回 ()

产品名称＝编辑框1.内容
规格型号＝编辑框2.内容
品牌＝编辑框3.内容
单位＝编辑框4.内容
市场单价＝编辑框5.内容
核心单价＝编辑框9.内容
数量＝编辑框6.内容
备注＝编辑框7.内容
参数＝编辑框8.内容
列表名＝编辑框10.内容

如果真 (_启动窗口.数据库连接1.是否已连接)

_启动窗口.数据库连接1.连接Access (取运行目录 () ＋ “\ledcp.mdb”, “”)

如果真 (id ＝ “”)

信息框 (“读取数据库出错！”, 0, )

返回 ()

sql ＝ “UPDATE 单双色产品 SET 规格型号='” ＋规格型号＋ “',产品名称='” ＋产品名称＋ “',品牌='” ＋品牌＋ “',单位='” ＋单位＋ “',市场单价='” ＋市场单价＋ “',核心单价='” ＋核心单价＋ “',数量='” ＋数量＋ “',备注='” ＋备注＋ “',参数='” ＋参数＋ “',列表名='” ＋列表名＋ “WHERE id=” ＋ id

如果 (_启动窗口.数据库连接1.执行SQL (sql))

信息框 (“更新 ” ＋产品名称＋ “ 信息成功！”, 0, , )

信息框 (“更新失败！”, 0, , )

_启动窗口.超级列表框1.全部删除 ()
_启动窗口._按钮1_被单击 ()

i支持库列表	支持库注释
eDB	数据库操作支持库
iext	扩展界面支持库一

afu45 · 发表于 2023-9-28 18:37:41

WHERE 前面少个单引号和空格

sql ＝ “UPDATE 单双色产品 SET 规格型号='” ＋规格型号＋ “',产品名称='” ＋产品名称＋ “',品牌='” ＋品牌＋ “',单位='” ＋单位＋ “',市场单价='” ＋市场单价＋ “',核心单价='” ＋核心单价＋ “',数量='” ＋数量＋ “',备注='” ＋备注＋ “',参数='” ＋参数＋ “',列表名='” ＋列表名＋ “' WHERE id=” ＋ id

原子 · 发表于 2023-9-28 19:57:08

sql ＝ “UPDATE 单双色产品 SET 规格型号='” ＋规格型号＋ “',产品名称='” ＋产品名称＋ “',品牌='” ＋品牌＋ “',单位='” ＋单位＋ “',市场单价='” ＋市场单价＋ “',核心单价='” ＋核心单价＋ “',数量='” ＋数量＋ “',备注='” ＋备注＋ “',参数='” ＋参数＋ “',列表名='” ＋列表名＋ “' WHERE id='” ＋ id＋"'"

yuan71058 · 发表于 2023-9-28 22:41:14

输出调试都不会?

		自动登录	找回密码
密码			注册

[精币悬赏] 易语言修改ACCESS数据库，修改失败，大神看看是不是语句...