Foxtable(狐表)用户栏目专家坐堂 → 代码纠错


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

主题:代码纠错

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


加好友 发短信
等级:一尾狐 帖子:461 积分:4295 威望:0 精华:0 注册:2019/8/5 17:49:00
代码纠错  发帖心情 Post By:2020/1/9 15:37:00 [显示全部帖子]

Dim Filter As String
If User.IsRole("车管员") Then
    Filter = "进度 = '1A'" '进度一开始
Else If User.IsRole("部门负责人") Then
    Filter = "进度 = '2A' And User.group = 所属部门" '进度一结束或进度二开始
Else If User.IsRole("生产车查验员") Then
    Filter = "进度 = '3A'" '进度二结束或进度三开始
Else If User.IsRole("车辆维修审核员") Then
    Filter = "进度 = '4A'" '进度三结束或进度四开始
Else If User.IsRole("车辆管理部门负责人") Then
    Filter = "进度 = '5A'" '进度四结束或进度五开始
Else If User.IsRole("维修厂审核员") Then
        Filter = "进度 = '6A'" '进度五结束或进度六开始
Else If User.IsRole("对账审核员") Then
        Filter = "进度 = '7A'" '进度六结束或进度七开始
Else If User.IsRole("系统管理员")
    Filter = "" '其他用户加载全部记录
Else
End If
DataTables("车辆维修申请表").LoadFilter = Filter
DataTables("车辆维修申请表").Load()

红色部门代码有错,当对应角色登录后,自动筛选进度为2A、角色的部门和表里所属部门相同时显示该行,加And User.group = 所属部门就报错了,求怎么改,

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


加好友 发短信
等级:一尾狐 帖子:461 积分:4295 威望:0 精华:0 注册:2019/8/5 17:49:00
  发帖心情 Post By:2020/1/9 16:20:00 [显示全部帖子]

.NET Framework 版本:4.0.30319.18063
Foxtable 版本:2019.12.17.18
错误所在事件:加载[车辆维修申请表]失败!
详细错误信息:
至少一个参数没有被指定值。


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


加好友 发短信
等级:一尾狐 帖子:461 积分:4295 威望:0 精华:0 注册:2019/8/5 17:49:00
  发帖心情 Post By:2020/1/9 16:51:00 [显示全部帖子]

显示:进度= '2A'  And 所属部门 = '管网运行部'

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


加好友 发短信
等级:一尾狐 帖子:461 积分:4295 威望:0 精华:0 注册:2019/8/5 17:49:00
  发帖心情 Post By:2020/1/9 16:53:00 [显示全部帖子]

表格 列名就是  所属部门  ,我把And后面的代码取消,就不报错,只是不能按部门筛选
[此贴子已经被作者于2020/1/9 16:57:49编辑过]

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


加好友 发短信
等级:一尾狐 帖子:461 积分:4295 威望:0 精华:0 注册:2019/8/5 17:49:00
  发帖心情 Post By:2020/1/9 17:36:00 [显示全部帖子]

是的,是表达式列,从车辆信息那边填充过来的

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


加好友 发短信
等级:一尾狐 帖子:461 积分:4295 威望:0 精华:0 注册:2019/8/5 17:49:00
  发帖心情 Post By:2020/1/9 17:48:00 [显示全部帖子]

但是已经存在记录了,表达式列已经有数据了,蓝老师,有什么办法解决吗?

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


加好友 发短信
等级:一尾狐 帖子:461 积分:4295 威望:0 精华:0 注册:2019/8/5 17:49:00
  发帖心情 Post By:2020/1/10 12:27:00 [显示全部帖子]

Parent(车辆维修申请).所属部门

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


加好友 发短信
等级:一尾狐 帖子:461 积分:4295 威望:0 精华:0 注册:2019/8/5 17:49:00
  发帖心情 Post By:2020/1/10 14:28:00 [显示全部帖子]

感谢蓝老师,这个以后数据库移动,换电脑,不会有影响吧?

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


加好友 发短信
等级:一尾狐 帖子:461 积分:4295 威望:0 精华:0 注册:2019/8/5 17:49:00
  发帖心情 Post By:2020/1/15 16:24:00 [显示全部帖子]

111

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


加好友 发短信
等级:一尾狐 帖子:461 积分:4295 威望:0 精华:0 注册:2019/8/5 17:49:00
  发帖心情 Post By:2020/1/15 16:26:00 [显示全部帖子]


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20200115162522.jpg
图片点击可在新窗口打开查看

蓝老师看下

 回到顶部
总数 14 1 2 下一页