以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]条件加载 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=101405) |
||||
-- 作者:huhuyq -- 发布时间:2017/5/30 14:21:00 -- [求助]条件加载
大神,我想根据用户角色条件加载表,目前设置了用户名为“佟”,角色为“苏州华宇”,想让他只看到苏州华宇公司当天的人员。我再菜单栏中写了如下代码,但是用户名进去表加载后没有任何内容,请赐教。 Select Case User.Roles Case "苏州华宇" DataTables("人工时台账").LoadFilter = "Date = \'" & Date.Today & "\' and Company = \'苏州华宇\'" DataTables("人工时台账").Load() Case "中原春城" DataTables("人工时台账").LoadFilter = "Date = \'" & Date.Today & "\' and Company = \'中原春城\'" DataTables("人工时台账").Load() Case "安装公司" DataTables("人工时台账").LoadFilter = "Date = \'" & Date.Today & "\' and Company = \'安装公司\'" DataTables("人工时台账").Load() End Select MainTable = Tables("人工时台账") |
||||
-- 作者:chen3728060 -- 发布时间:2017/5/30 22:00:00 -- 你试一下加载条件加一个
DataTables("人工时台账").LoadTop ="100 percent" |
||||
-- 作者:有点色 -- 发布时间:2017/5/31 9:20:00 -- Select Case User.Roles Case "苏州华宇" DataTables("人工时台账").LoadFilter = "Date = #" & Date.Today & "# and Company = \'苏州华宇\'" DataTables("人工时台账").Load() Case "中原春城" DataTables("人工时台账").LoadFilter = "Date = #" & Date.Today & "# and Company = \'中原春城\'" DataTables("人工时台账").Load() Case "安装公司" DataTables("人工时台账").LoadFilter = "Date = #" & Date.Today & "# and Company = \'安装公司\'" DataTables("人工时台账").Load() End Select MainTable = Tables("人工时台账") |