老师下面是我创建了内部函数，现在我想加筛选条件dim filter as string = Functions.Execute("iload","部门信息","department")，这个filter加到哪个位置？代码如何写？filter是获取的满足条件的departID， filter = "departid in ('" & str.Replace(",","','") & "')" 我想达到生成的目录树是在他可查看部门的权限范围内
Dim nd As WinForm.TreeNode = args(0)
Dim dt As DataTable = args(1)
Dim drs As List(of DataRow) = dt.Select("[parentID] = '" & nd.name & "' and filter ","order")
For Each dr As DataRow In drs
Dim cd As Winform.TreeNode = nd.Nodes.Add(dr("departID"),dr("departname"))
Functions.Execute("AddChildren",cd,dt)
Next
[此贴子已经被作者于2020/11/25 19:07:58编辑过]
加好友 
发短信
Post By：2020/11/25 19:04:00 [只看该作者]
