大神,我想根据用户角色条件加载表,目前设置了用户名为“佟”,角色为“苏州华宇”,想让他只看到苏州华宇公司当天的人员。我再菜单栏中写了如下代码,但是用户名进去表加载后没有任何内容,请赐教。
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("人工时台账")