以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  求助:有递归类字段的加载条件代码  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=85885)

--  作者:lzzhx
--  发布时间:2016/6/4 16:55:00
--  求助:有递归类字段的加载条件代码
请老师看看,下面代码中红色部门该如何写
Dim cmd As new SQLCommand
cmd.ConnectionName = gs_strActiveConn  \'数据源名称
cmd.CommandText= "s elect 部门编号,上级部门编号,部门名称 from 公司部门表"
Dim dt As DataTable = cmd.ExecuteReader

\'加载条件是所有部门
dt.LoadFilter = ""

\'加载条件是本部门
dt.LoadFilter = ??????????????

\'加载条件是本部门及子部门
dt.LoadFilter = ??????????????

\'加载条件是上级部门
dt.LoadFilter = ??????????????


\'加载条件是上级及本部门和子部门
dt.LoadFilter = ??????????????

\'加载条件是子部门
dt.LoadFilter = ??????????????

--  作者:Hyphen
--  发布时间:2016/6/4 17:04:00
--  
1,增加一个全路径的字段,通过这个字段进行加载

2,全部加载,然后用代码处理

--  作者:lzzhx
--  发布时间:2016/6/4 17:14:00
--  
增加一个全路径字段倒是可以,但怎样根据 部门编号和上级部门编号 自动对全路径字段进行赋值?代码怎么写?
--  作者:Hyphen
--  发布时间:2016/6/4 17:22:00
--  
递归,逐级增加路径http://www.foxtable.com/help/topics/2416.htm
--  作者:lzzhx
--  发布时间:2016/6/4 18:49:00
--  
不会写,请老师给帮一下吧
--  作者:大红袍
--  发布时间:2016/6/5 11:33:00
--  

不能,必须不断的查询,写sql语句递归比较麻烦

 

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=69613&skin=0