Foxtable(狐表)用户栏目专家坐堂 → [求助]条件加载


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

主题:[求助]条件加载

帅哥哟,离线,有人找我吗?
lgj716330
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1308 积分:10107 威望:0 精华:0 注册:2013/11/8 15:27:00
[求助]条件加载  发帖心情 Post By:2020/3/7 9:23:00 [只看该作者]

如示例
表A是档案表,每个登录用户都有自己的店铺权限,表B数据如何根据表A各自的店铺权限进行加载
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目13.foxdb



 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107664 积分:547635 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/3/7 9:51:00 [只看该作者]

看项目事件
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目13.zip


 回到顶部
帅哥哟,离线,有人找我吗?
lgj716330
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1308 积分:10107 威望:0 精华:0 注册:2013/11/8 15:27:00
  发帖心情 Post By:2020/3/7 10:06:00 [只看该作者]

版本高打不开图片点击可在新窗口打开查看

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107664 积分:547635 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/3/7 10:12:00 [只看该作者]

升级到最新版

 回到顶部
帅哥哟,离线,有人找我吗?
lgj716330
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1308 积分:10107 威望:0 精华:0 注册:2013/11/8 15:27:00
  发帖心情 Post By:2020/3/7 11:25:00 [只看该作者]

老师,代码贴一下吧,免费升级到期了,等资金充裕了再升级一下

 回到顶部
帅哥,在线噢!
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107664 积分:547635 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/3/7 11:30:00 [只看该作者]

BeforeLoadInnerTable事件
If e.DataTableName = "表B" Then
    e.Filter = "[_Identify] Is Null"
End  If

LoadUserSetting事件
Dim s As String = DataTables("表A").GetComboListString("店铺名称","',' + 登录用户 + ',' like '%," & user.Name & ",%'")
DataTables("表B").LoadFilter = "店铺名称 in ('" & s.Replace("|","','") & "')"
DataTables("表B").Load

 回到顶部