|
.版本 2
.支持库 iext
.局部变量 记录集句柄, 整数型
.局部变量 索引, 文本型
超级列表框1.全部删除 ()
记录集句柄 = 外部数据库1.查询 (“select * from 数据 where 客户 like('%” + 编辑框1.内容 + “%')”)
外部数据库1.到首记录 (记录集句柄)
.判断循环首 (外部数据库1.尾记录后 (记录集句柄) = 假)
索引 = 外部数据库1.读 (记录集句柄, 2)
超级列表框1.插入表项 (0, 索引, , , , )
超级列表框1.置标题 (0, 1, 外部数据库1.读 (记录集句柄, 3))
超级列表框1.置标题 (0, 2, 到文本 (外部数据库1.读 (记录集句柄, 4)))
超级列表框1.置标题 (0, 3, 外部数据库1.读 (记录集句柄, 5))
超级列表框1.置标题 (0, 4, 外部数据库1.读 (记录集句柄, 6))
超级列表框1.置标题 (0, 5, 外部数据库1.读 (记录集句柄, 7))
超级列表框1.置标题 (0, 6, 外部数据库1.读 (记录集句柄, 8))
超级列表框1.置标题 (0, 7, 外部数据库1.读 (记录集句柄, 9))
超级列表框1.置标题 (0, 8, 外部数据库1.读 (记录集句柄, 10))
超级列表框1.置标题 (0, 9, 外部数据库1.读 (记录集句柄, 11))
超级列表框1.置标题 (0, 10, 外部数据库1.读 (记录集句柄, 12))
外部数据库1.到后一记录 (记录集句柄)
.判断循环尾 ()
|
|