易语言删除超级列表框1数据内容
.版本2.支持库iext.局部变量SQL,文本型.如果(信息框(“确定要删除”+超级列表框1.取标题(超级列表框1.现行选中项,1)+“此数据?”,#询问图标+#确认取消...
.版本 2
.支持库 iext.局部变量 SQL, 文本型.如果 (信息框 (“确定要删除” + 超级列表框1.取标题 (超级列表框1.现行选中项, 1) + “此数据?”, #询问图标 + #确认取消钮, “警告”) = #确认钮)
SQL = “delete * from mdb where 姓名=” + 超级列表框1.取标题 (超级列表框1.现行选中项, 0) + “'” 外部数据库1.启动事务 ()
.如果 (外部数据库1.执行 (SQL, ))
信息框 (“删除数据” + 超级列表框1.取标题 (超级列表框1.现行选中项, 1) + “信息成功!”, 0, “删除成功”)
外部数据库1.提交事务 ()
显示列表 ()
.否则
信息框 (“删除数据” + 超级列表框1.取标题 (超级列表框1.现行选中项, 1) + “信息失败!”, 64, “删除失败”)
外部数据库1.回滚事务 ()
.如果结束.否则
返回 ()
.如果结束
_窗口1_创建完毕 ()
_按钮1_被单击 ()
它把数据里名字一样的都删了,请大家帮忙改一下。只删除鼠标点过的一条数据 谢谢了 展开
.支持库 iext.局部变量 SQL, 文本型.如果 (信息框 (“确定要删除” + 超级列表框1.取标题 (超级列表框1.现行选中项, 1) + “此数据?”, #询问图标 + #确认取消钮, “警告”) = #确认钮)
SQL = “delete * from mdb where 姓名=” + 超级列表框1.取标题 (超级列表框1.现行选中项, 0) + “'” 外部数据库1.启动事务 ()
.如果 (外部数据库1.执行 (SQL, ))
信息框 (“删除数据” + 超级列表框1.取标题 (超级列表框1.现行选中项, 1) + “信息成功!”, 0, “删除成功”)
外部数据库1.提交事务 ()
显示列表 ()
.否则
信息框 (“删除数据” + 超级列表框1.取标题 (超级列表框1.现行选中项, 1) + “信息失败!”, 64, “删除失败”)
外部数据库1.回滚事务 ()
.如果结束.否则
返回 ()
.如果结束
_窗口1_创建完毕 ()
_按钮1_被单击 ()
它把数据里名字一样的都删了,请大家帮忙改一下。只删除鼠标点过的一条数据 谢谢了 展开
1个回答
2013-07-03
展开全部
“delete * from mdb where 姓名=” + 超级列表框1.取标题 (超级列表框1.现行选中项, 0) + “'”这个sql语句在加个唯一标识这条数据的条件!!例如:“delete * from mdb where 姓名='” + 超级列表框1.取标题 (超级列表框1.现行选中项, 0) + “' and ID=?” 问号就是唯一标识这条数据的值!
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询