Foxtable(狐表)用户栏目专家坐堂 → 控制目录树


  共有2329人关注过本帖平板打印复制链接

主题:控制目录树

帅哥哟,离线,有人找我吗?
刘林
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1936 积分:14844 威望:0 精华:0 注册:2016/4/28 9:58:00
控制目录树  发帖心情 Post By:2017/5/14 18:09:00 [只看该作者]

Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.connectionname =
If js.Contains("区业务主管")
cmd.CommandText = "SELE  CT DISTINCT 考试名称,单位名称,年级代码,班级,学段  From {成绩} where 学段 ='小学'"
Else
cmd.CommandText = "SEL  ECT DISTINCT 考试名称,单位名称,年级代码,班级,学段  From {成绩} where 单位名称 = '" & _usergroup & "' and 学段 = '小学' and "
End If
dt = cmd.ExecuteReader()
Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
trv.BuildTree(dt,"考试名称|单位名称|年级代码|班级")
DataTables("成绩").loadfilter = "[_Identify] Is null"
DataTables("成绩").load

窗口afterload事件,我现在有个需要是有一个控制表中有个是否可看列,用于控制某次考试成绩是否让用户看到,我想做成当控制表中某次考试名称的是否可看为false,则用户的目录树中就不显示这次考试的考试名称,这样他就看不到,请问该怎么办,谢谢

 回到顶部