蓝老师,请教按条件加载数据问题,我想实现先满足开发者登录加载所有行;用户分组为商贸公司的,加载"商贸公司"列为登录用户行,用户分组为非商贸公司加载“用户单位”列为登录用户的行,即不同用户处理不同的行。在此基础上只加载日期为当天的。以下代码未能实现,敬请蓝老师指导
'按条件加载数据,让不同用户处理不同的行
If User.Type <> UserTypeEnum.Developer Then
'如果用户为非开发者
If User.Group = "商贸公司" Then '如果用户分组是"商贸公司"
DataTables("表名").LoadFilter = "商贸公司 = '" &
User.Name & "'" '那么加载"商贸公司"列为登录用户负责行
Else
DataTables("表名").LoadFilter = "用户单位 = '" &
User.Name & "'" '否则只加载"用户单位"为登录用户负责的行
End If
Else
DataTables("表名").LoadFilter = "" '加载所有行
End If
'满足上面条件再只加载今天的采购验收:
DataTables("表名").LoadFilter = "[创建日期] = '" & Date.Today
& "'" '当天
DataTables("表名").Load