Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共5 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:[求助]用户不同,数据显示不同,应如何编写代码?

1楼
jgc1010 发表于:2009/7/1 12:52:00

这里有14组用户,组名分别为01,02,至14。我的目标是想让01组的用户登录时,只能看到所有表中[qzh]字段=01的数据,即只显示组名与qzh的值相同的数据。而整个程序的表大概有10张,如ajk、tblwjk、zpaj、zpjn、cxaj、cxjn等表。代码应如何编制?

2楼
yangming 发表于:2009/7/1 13:33:00
1.每张表中都加一列:qzh,然后根据不同用户加载不能数据
2.增加几个用户
3.表 DataColChanged 事件中
If e.DataCol.Name = "产品" Then '
    If e.DataRow.IsNull("产品") Then '
        e.DataRow("业务员") = Nothing '
    Else
      e.DataRow("业务员") = User.Name
    End If
End If

4.在项目事件:BeforeLoadInnerTable
If e.DataTableName = "产品" AndAlso e.User.Name <> "开发者" Then
    e.Filter = "[业务员] = '" & e.User.Name & "'"
End If
[此贴子已经被作者于2009-7-1 13:34:20编辑过]
3楼
roy78 发表于:2009/7/1 14:13:00
  在beforeloadinnettable事件中设置,以下仅提供思路,代码不全
 
If e.DataTableName = "表名" AndAlso e.User.Name = "权限组数据" Then


e.SelectString = "Select * From [表名] Where [qzh] =

End If

新手回贴,有错莫怪...
[此贴子已经被作者于2009-7-1 14:14:27编辑过]
4楼
狐狸爸爸 发表于:2009/7/1 14:47:00
如果是内部表,请参考:
BeforeLoadInnerTable

如果是外部表,请参考:
BeforeLoadOuterTable
5楼
jgc1010 发表于:2009/7/2 22:26:00

谢谢!我测试一下看看

共5 条记录, 每页显示 10 条, 页签: [1]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .02344 s, 2 queries.