Foxtable(狐表)用户栏目专家坐堂 → 用户


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

主题:用户

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


加好友 发短信
等级:童狐 帖子:266 积分:2166 威望:0 精华:0 注册:2014/12/16 12:25:00
用户  发帖心情 Post By:2015/5/31 16:33:00 [显示全部帖子]

外部数据表中建立一个access用户数据表,但是连接时提示“所有用户表的结构不符合规范”,用户表(access)结构是什么样的

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


加好友 发短信
等级:童狐 帖子:266 积分:2166 威望:0 精华:0 注册:2014/12/16 12:25:00
  发帖心情 Post By:2015/5/31 17:36:00 [显示全部帖子]

如果 要求每个部门的用户只能编辑本部门的记录,对于其他部门负责的行,则只能查看和编辑本部门的内容,看不见其他部门的代码怎么写,(注:表内容在窗口中操作)
如下代码在窗口中操作时怎么改

3、然后将表的DataRowAdding事件设置为:

e.DataRow("部门") = User.Group

这样新增行的时候,会自动在部门列填入当前登录用户所属的分组,也就是该用户所属的部门。

4、最后将表的PrepareEdit事件设置为:

If e.Row("部门") <> User.Group Then 
    e.Cancel = 
True
End
 
If

这样在编辑某行前,会自动判断负责此行的部门列是否和登录用户所属分组相同,如果不同,则取消编辑。



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


加好友 发短信
等级:童狐 帖子:266 积分:2166 威望:0 精华:0 注册:2014/12/16 12:25:00
  发帖心情 Post By:2015/5/31 17:36:00 [显示全部帖子]

一楼的问题可忽略

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


加好友 发短信
等级:童狐 帖子:266 积分:2166 威望:0 精华:0 注册:2014/12/16 12:25:00
  发帖心情 Post By:2015/5/31 22:51:00 [显示全部帖子]

按4楼的,又提示一个错误“至少一个参数没有被指定值。”
[此贴子已经被作者于2015/5/31 22:51:18编辑过]

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


加好友 发短信
等级:童狐 帖子:266 积分:2166 威望:0 精华:0 注册:2014/12/16 12:25:00
  发帖心情 Post By:2015/6/1 12:00:00 [显示全部帖子]

本人使用的是外部数据源,写了如下代码

表购率条件 [_Identify] Is Null

If User.Name = "开发者" Then
    DataTables("住院记录").LoadFilter = ""
Else
    DataTables("住院记录").LoadFilter = "科别 = '" & User.Group & "'"
End If
DataTables("住院记录").Load()

用户名是按科室分的
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:新建文件夹.rar

提示错误“至少一个参数没有被指定值”

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


加好友 发短信
等级:童狐 帖子:266 积分:2166 威望:0 精华:0 注册:2014/12/16 12:25:00
  发帖心情 Post By:2015/6/1 12:03:00 [显示全部帖子]

上面写错一句“购率”,正确的是“过滤”

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


加好友 发短信
等级:童狐 帖子:266 积分:2166 威望:0 精华:0 注册:2014/12/16 12:25:00
  发帖心情 Post By:2015/6/1 12:55:00 [显示全部帖子]

附件整个30mb 发布过去,咋办?

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


加好友 发短信
等级:童狐 帖子:266 积分:2166 威望:0 精华:0 注册:2014/12/16 12:25:00
  发帖心情 Post By:2015/6/1 21:17:00 [显示全部帖子]

使用外部数据表时,表事件中用不用下面代码

e.DataRow("部门") = User.Group


If e.Row("部门") <> User.Group Then 

    e.Cancel = True
End
 
If


还是出现原来的错误,我真笨!


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


加好友 发短信
等级:童狐 帖子:266 积分:2166 威望:0 精华:0 注册:2014/12/16 12:25:00
  发帖心情 Post By:2015/6/1 21:30:00 [显示全部帖子]

 按11楼得1=2 也出现同样的问题
表概况:有一个“住院记录”表,表里有一个“科别”的列名,各行记录“内科,外科等科室病人的信息,用户管理里也设置“内科,外科”等科室的名称作为用户名,用下面的代码登录时“开发者”正常登陆,切换“内科,外科”等用户时就出现“至少一个参数没有被指定值”的错误
If User.Name = "开发者" Then
    DataTables("住院记录").LoadFilter = ""
Else
    DataTables("住院记录").LoadFilter = "科别 = '" & User.Group & "'"
End If
DataTables("住院记录").Load()

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


加好友 发短信
等级:童狐 帖子:266 积分:2166 威望:0 精华:0 注册:2014/12/16 12:25:00
  发帖心情 Post By:2015/6/1 22:12:00 [显示全部帖子]

问题解决了,非常感谢

 回到顶部
总数 24 1 2 3 下一页