易语言里怎么读取数据库里的数据到树形框

‘不用外部数据库，添加一个数据库连接1控件：

’假设库文件名为“产品数据库.mdb”，库中的表名为“产品表”，产品字段名“类别”

全局变量：a 文本型

如果真（数据库连接1.连接Access（取运行目录（）+“\产品数据库.mdb”，“”）=假）

          信息框（“连接数据库失败！”，0，）

返回（）

’添加一个记录集控件；

记录集1.置连接（数据库连接1）

‘上面我们已经打开并且连接好了MDB数据库，接下来我们做读取和显示；

记录集1.打开（“select * from 产品表”，#SQL语句，#服务器端游标）

记录集1.到首记录（）

判断循环首（记录集1.尾记录后=假）

      记录集1.读文本（“类别”，a）

      如果真（a=“日用品”）

        树型框1.加入项目（0，a，，，，，）

      如果真（a=“洗化用品”）

        树型框1.加入项目（1，a，，，，，）

      如果真（a=“洗发水” 或 a=“洗衣粉”）

        树型框1.加入项目（2，a，，，，，）

      记录集1.到下一条（）

判断循环尾（）

记录集1.关闭（）

定义一个TreeNode类.里面有

id 自身id

parentId 父节点id

name 树显示文本

url 链接地址

open 是否展开树

等属性.

将从数据库查出来的数据一个个set到TreeNode里面.封装成一个List<TreeNode>.

再将这个List转换成你的树所需要的格式内容.比如json格式

---