以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  根据不同用户登录显示不同用户数据  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=4964)

--  作者:老有所乐
--  发布时间:2009/11/12 23:01:00
--  根据不同用户登录显示不同用户数据
在进货表的窗口的Table中,显示进货表数据。请教如何根据不同用户登录显示不同用户数据,即用户业务员A登录,显示业务员列含有业务员A的所有行数据,用户业务员B登录,显示业务员列含有业务员B的所有行数据。谢谢!
管理员密码:888
业务员A 密码:111
业务员B 密码:222
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:进销存2.table

[此贴子已经被作者于2009-11-12 23:03:38编辑过]

--  作者:czy
--  发布时间:2009/11/12 23:56:00
--  
直接在AfterLoad事件中设置行吗?

Tables("进货表").Filter = "业务员 = \'" & User.Name & "\'"

--  作者:老有所乐
--  发布时间:2009/11/13 11:00:00
--  
谢谢C班主
--  作者:老有所乐
--  发布时间:2009/11/13 16:39:00
--  
如果是管理员登录,窗口和“进货表”都没有数据,应该如何才会有数据。谢谢!
[此贴子已经被作者于2009-11-13 16:39:30编辑过]

--  作者:狐狸爸爸
--  发布时间:2009/11/13 16:45:00
--  
If  e.User.Type = UserTypeEnum.User Then
    Tables("进货表").Filter = "业务员 = \'" & User.Name & "\'"
End If
--  作者:老有所乐
--  发布时间:2009/11/13 17:12:00
--  
谢谢贺老师!
--  作者:wqc360
--  发布时间:2009/11/13 17:22:00
--  
我怎么做起来提示错误,If  e.User.Type = UserTypeEnum.User Then
是在AfterLoad事件中设置吗,我也刚好需要,要不楼主做好的共享一下,谢谢了
--  作者:狐狸爸爸
--  发布时间:2009/11/13 17:28:00
--  
这样,就没错:


If  User.Type = UserTypeEnum.User Then
    Tables("进货表").Filter = "业务员 = \'" & User.Name & "\'"
End If