Question

易语言SQL数据库。如何将“编辑框”，“组合框”，“日期框”的内容添加到超级列表框内？通过后一定加分！

我的软件现在刚刚写好数据库（数据库类型：SQL），请教：如何在点击“添加按钮”后将编辑框、组合框、日期框的内容加到超级列表框里？它的命令要怎么写？（要详细一点的，最好是写出完整的命令出来。不要只告诉我它的语句是怎样，毕竟如果只是它的语句很容易查到的。我现在就是卡在SQL添加命令语句这里不会动了。）
另外：SQL查询语句，如果我要以日期框所选的日期或者一个组合框内所选条件为依据查询，命令应该要怎么写？（要求同上，最好请写出命令！！）

Answer 1

.版本 2

.支持库 mysql

.支持库 iext

Z开始日期 ＝ 到文本 (取年份 (日期框1开始日期.今天)) ＋ “-” ＋ 到文本 (取月份 (日期框1开始日期.今天)) ＋ “-” ＋ 到文本 (取日 (日期框1开始日期.今天)) ＋ “ ” ＋ 取文本右边 (“00” ＋ 到文本 (取小时 (日期框1开始日期.今天)), 2) ＋ “:” ＋ 到文本 (取文本右边 (“00” ＋ 到文本 (取分钟 (日期框1开始日期.今天)), 2)) ＋ “:” ＋ 到文本 (取文本右边 (“00” ＋ 到文本 (取秒 (日期框1开始日期.今天)), 2))

Z到期日期 ＝ 到文本 (到文本 (取年份 (日期框1到期日期.今天)) ＋ “-” ＋ 到文本 (取月份 (日期框1到期日期.今天)) ＋ “-” ＋ 到文本 (取日 (日期框1到期日期.今天)) ＋ “ ” ＋ 取文本右边 (“00” ＋ 到文本 (取小时 (日期框1到期日期.今天)), 2) ＋ “:” ＋ 到文本 (取文本右边 (“00” ＋ 到文本 (取分钟 (日期框1到期日期.今天)), 2)) ＋ “:” ＋ 到文本 (取文本右边 (“00” ＋ 到文本 (取秒 (日期框1到期日期.今天)), 2)))

算日期 ()

.判断开始 (sql状态 ＝ “连接成功”)

.如果 (增加记录 (mysql句柄, “ns_b”, “b1='” ＋ Z开始日期 ＋ “',b2='” ＋ 编辑框1姓名.内容 ＋ “',b3='” ＋ 编辑框1电话.内容 ＋ “',b4='” ＋ 编辑框1租金.内容 ＋ “',b5='” ＋ 编辑框1地址.内容 ＋ “',b6='” ＋ 编辑框1原作物名.内容 ＋ “',b7='” ＋ 编辑框1土地代码.内容 ＋ “',b8='” ＋ 编辑框1土地名称.内容 ＋ “',b9='” ＋ 编辑框1土地类型.内容 ＋ “',b10='” ＋ 编辑框1土地面积.内容 ＋ “',b11='” ＋ 编辑框1种植数量.内容 ＋ “',b12='” ＋ 编辑框1种植种类.内容 ＋ “',b13='” ＋ 编辑框1品种名称.内容 ＋ “',b14='” ＋ 编辑框1种植大小.内容 ＋ “',b15='” ＋ 编辑框_租用备注.内容 ＋ “',b16='” ＋ 编辑框1租用年限.内容 ＋ “',b17='” ＋ 是否到期 ＋ “',b18='” ＋ Z到期日期 ＋ “';”))

透明标签_保存成功与否.标题 ＝ “保存成功”

.如果 (信息框 (“保存成功！---是否继续添加信息?”, #是否钮 ＋ #询问图标, “增加信息”, 高级选择夹2租用信息) ＝ #是钮)

连续赋值 (“”, 编辑框1地址.内容, 编辑框1租金.内容, 编辑框1电话.内容, 编辑框1姓名.内容, 编辑框_查询.内容, 编辑框1种植种类.内容, 编辑框_租用备注.内容, 编辑框1种植大小.内容, 编辑框1种植数量.内容, 编辑框1品种名称.内容, 编辑框1租用年限.内容, 编辑框1原作物名.内容, 编辑框1土地代码.内容, 编辑框1土地名称.内容, 编辑框1土地类型.内容, 编辑框1土地面积.内容)

透明标签_保存成功与否.标题 ＝ “”

.否则

透明标签_保存成功与否.标题 ＝ “”

.如果结束

.否则

透明标签_保存成功与否.标题 ＝ “保存失败”

返回 ()

.如果结束

.默认

信息框 (“连接数据库失败！”, #警告图标, , )

欢迎交流

Answer 2

索引=超级列表框.插入表项()
超级列表框.置标题(索引，0，编辑框.内容)
超级列表框.置标题(索引，1，组合框.取项目文本(组合框.现行选择项))
超级列表框.置标题(索引，2，日期框.今天)

写数据库可以用外数据库组件，也可以用数据库连接和记录集组件
记录集.打开("INSERT INTO ……",#SQL语句)

自己看帮助吧，应该不是很难！