If User.Roles = "木作订单员" Then
DataTables("终端用户").LoadFilter = ""
ElseIf DataTables("终端用户").LoadFilter = "提交人 = '" & User.Name & "'" Then
'DataTables("终端用户").Load()
ElseIf DataTables("终端用户").LoadFilter = "建档人员 = '" & User.Name & "'" Then
'DataTables("终端用户").Load()
ElseIf DataTables("终端用户").LoadFilter = "木作设计 = '" & User.Name & "'" Then
'DataTables("终端用户").Load()
ElseIf DataTables("终端用户").LoadFilter = "商务经理 = '" & User.Name & "'" Then
'DataTables("终端用户").Load()
ElseIf DataTables("终端用户").LoadFilter = "软装设计 = '" & User.Name & "'" Then
End If
DataTables("终端用户").Load()
系统有下列5列 填入对应的职员名称
提交人
建档人员
木作设计
商务经理
软装设计
登录时分别判断登陆的用户 根据找到的登录名的类型加载数据
[此贴子已经被作者于2017/12/27 20:05:33编辑过]