Foxtable(狐表) → 用户栏目 → 专家坐堂 → 请教按条件加载数据问题


  共有1242人关注过本帖树形打印复制链接

主题：请教按条件加载数据问题
帅哥哟，离线，有人找我吗？
13315253800
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：二尾狐 帖子：589 积分：4305 威望：0 精华：0 注册：2018/1/3 16:03:00 		请教按条件加载数据问题  发帖心情 Post By：2024/8/20 9:55:00 [只看该作者]

蓝老师，请教按条件加载数据问题，我想实现先满足开发者登录加载所有行；用户分组为商贸公司的，加载"商贸公司"列为登录用户行，用户分组为非商贸公司加载“用户单位”列为登录用户的行，即不同用户处理不同的行。在此基础上只加载日期为当天的。以下代码未能实现，敬请蓝老师指导

'按条件加载数据，让不同用户处理不同的行

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

       



 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110443 积分：562081 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2024/8/20 10:45:00 [只看该作者]

dim filter as string = "[创建日期] = '" & Date.Today & "'"  '当天
If User.Type <> UserTypeEnum.Developer Then '如果用户为非开发者
    If User.Group = "商贸公司" Then '如果用户分组是"商贸公司"
        filter  = filter  & " and 商贸公司 = '" & User.Name & "'" '那么加载"商贸公司"列为登录用户负责行
    Else
        filter  = filter  & " and 用户单位 = '" & User.Name & "'" '否则只加载"用户单位"为登录用户负责的行
    End If
End If
'满足上面条件再只加载今天的采购验收：
DataTables("表名").LoadFilter =  filter
DataTables("表名").Load
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04297 秒, 4 次数据查询