treeview遍历数据库问题

来源：百度知道 编辑：UC知道 时间：2024/05/18 00:44:13
我用vb6+access数据库做了一个系统，现在想做一个目录树（treeview),问题是这样的:想让在不同的层次显示人员的基本信息，例如:
机构表：行名，机构1，机构2，机构3
人员表：行名，机构1，机构2，机构3，编号，姓名，、、、
按机构表的内容显示树形目录，现在的难点是想在机构1处，或机构2处或机构3处显示人员表的信息，如
内蒙古->科技处->人员名单，或内蒙古->包头市->人员名单，怎么实现，请各位大侠帮助，表述的 是否清楚，我的QQ:946932870

dim nodeX as node
dim NodeY as node
dim rs as adodb.recordset
dim i as integer
set rs=cn.execute("Select * from gzgl")
set nodex=treeview1.nodes.add ,,"字段名"
for i=0 to rs.fields.count-1
set NodeY =treeview1.nodes.add(nodex.index,,rs.fields(i).name)
next