<em>易语言</em> <em>sql</em>查询语句如何显示到超级

其实 很简单 

主要就是 利用循环 把查询结果的每一条插入到超级列表框里面  超级列表框 加入项目 然后 给每一个列项目置标题

数据库连接1.连接Access (“data.mdb”, “”)

.版本 2
.支持库 iext
.支持库 eDB

.子程序 刷新结果列表

超级列表框1.全部删除 ()
记录集1.到首记录 ()
.判断循环首 (记录集1.尾记录后 ＝ 假)
超级列表框1.插入表项 (, , , , , )
记录集1.读文本 (“编号”, 编号) ' 编号是整数型的，这里用文本接收也正常
超级列表框1.置标题 (超级列表框1.取表项数 () － 1, 0, 编号)
记录集1.读文本 (“商品名称”, 商品名称)
超级列表框1.置标题 (超级列表框1.取表项数 () － 1, 1, 商品名称)
记录集1.读文本 (“商品规格”, 商品规格)
超级列表框1.置标题 (超级列表框1.取表项数 () － 1, 2, 商品规格)
记录集1.读文本 (“商品数量”, 商品数量)
超级列表框1.置标题 (超级列表框1.取表项数 () － 1, 3, 商品数量)
记录集1.读文本 (“单位”, 单位)
超级列表框1.置标题 (超级列表框1.取表项数 () － 1, 4, 单位)
记录集1.读文本 (“进货价格”, 进货价格)
超级列表框1.置标题 (超级列表框1.取表项数 () － 1, 5, 进货价格)
记录集1.读文本 (“同行价格”, 同行价格)
超级列表框1.置标题 (超级列表框1.取表项数 () － 1, 6, 同行价格)
记录集1.读文本 (“销售价格”, 销售价格)
超级列表框1.置标题 (超级列表框1.取表项数 () － 1, 7, 销售价格)
记录集1.读文本 (“市场价格”, 市场价格)
超级列表框1.置标题 (超级列表框1.取表项数 () － 1, 8, 市场价格)
记录集1.读日期时间 (“入库时间”, 入库时间)
超级列表框1.置标题 (超级列表框1.取表项数 () － 1, 9, 到文本 (入库时间))
记录集1.读文本 (“商品介绍”, 商品介绍)
超级列表框1.置标题 (超级列表框1.取表项数 () － 1, 10, 商品介绍)
记录集1.到下一条 ()
.判断循环尾 ()
记录集1.关闭 ()

下面是查找的

.版本 2
.支持库 eDB

.子程序 _查找编辑框1_内容被改变

.如果 (组合框1.内容 ＝ “商品规格”)
_启动窗口.记录集1.打开 (“SELECT * FROM 商品 WHERE 商品规格 like '%” ＋ 查找编辑框1.内容 ＋ “%'”, #SQL语句)
.否则e799bee5baa6e58685e5aeb9361
.如果 (组合框1.内容 ＝ “编号”)
_启动窗口.记录集1.打开 (“SELECT * FROM 商品 WHERE 编号 like '%” ＋ 查找编辑框1.内容 ＋ “%'”, #SQL语句)
.否则
_启动窗口.记录集1.打开 (“SELECT * FROM 商品 WHERE 商品名称 like '%” ＋ 查找编辑框1.内容 ＋ “%'”, #SQL语句)
.如果结束

.如果结束
刷新结果列表 ()
另外,站长团上有产品团购,便宜有保证
记录集.打开("slect * from 表名 order by 编号",1,)
记录集.到首记录()
计次循环首（记录集.记录数量,整数知变量)
记录集.读文本道回(0,文本变量)
高级答表格.置数据(整数变量,1,1,文本变量)
记录集.读文本(1,文本变量)
高级表格.置数据(整数变量,2,1,文本变量)
记录集.读文本(2,文本变量)
高级表格.置数据(整数变量,3,1,文本变量)
记录集.到下一条()
计次循环尾()
记录集.关闭()

.版本 2
.支持库制 eDB
.支持库 iext
数据库连百接1.连接SQLServer (, , , )
记录集1.置连接 (数据库连接1)
记录集1.打开 (“SELECT 列 FROM 表”, #SQL语句, )
.计次度循环首 (记录集1.记录数量, n1)
记录集1.读文知本 (“列”, 临时)
超级列表框道1.插入表项 (n1, 临时, , , , )
.计次循环尾 ()
.计次循环首 (超级列表框1.取表项数 (), n2)
写到文件 (“XX.txt”, 超级列表框1.取标题 (n2, ))
.计次循环尾 ()

本文标签：易语言sql(1)易语言 excel sql(1)