Question

易语言数据库，如何通过时间条件查询数据？（30分）

1、建立了一个数据库，里面有一个出差时间（日期时间型）、出差地点（文本型）、出差人员（文本型）。
2、在程序中我建立了一个超级列表框1，一个查询按钮（用于把数据库数据在超级列表框显示出来）。
3、两个日期框，一个时间查询按钮。

希望有使用易语言的高手帮一下我，如何实现，选好两个日期框的时间后，超级列表框可以把两个日期的中间所有的日期的数据在超级列表框中显示出来。谢谢

Answer 1

.版本 2

.常量 数据库1, "“数据库”"

.常量 出差时间, "“出差时间”"

.常量 出差地点, "“出差地点”"

.常量 出差人员, "“出差人员”"

.版本 2

.支持库 iext

.程序集 窗口程序集1

.子程序 __启动窗口_创建完毕

打开 (#数据库1, , , , , , )

.子程序 _查询按钮_被单击

.局部变量 计次, 整数型

.局部变量 开始日期, 日期时间型

.局部变量 结束日期, 日期时间型

.局部变量 行, 整数型

.局部变量 id, 日期时间型

超级列表框1.全部删除 ()

开始日期 ＝ 日期框1.今天

结束日期 ＝ 日期框2.今天

计次 ＝ 取记录数 ()

到首记录 ()

.计次循环首 (计次, )

    id ＝ 读 (#出差时间)

    .判断开始 (查找 (id ≥ 开始日期 且 id ≤ 结束日期))

        行 ＝ 超级列表框1.插入表项 (-1, , , , , )

        超级列表框1.置标题 (行, 0, 到文本 (id))

        超级列表框1.置标题 (行, 1, 读 (#出差地点))

        超级列表框1.置标题 (行, 2, 读 (#出差人员))

    .默认

    .判断结束

    跳过 ()

.计次循环尾 ()