Rss & SiteMap
Foxtable(狐表) http://www.foxtable.com
如图 用 冼开京 用户登录
表中第二行 成本单价 显示 ****** (该用户为业务员,如果是业务员就显示*****)
但是 点击第二行 的产品名称 弹出窗口,却不显示星号,而是显示了真实成本,如何解决?
下载信息 [文件大小: 下载次数: ] | |
![]() |
DrawCell事件不仅用于标记数据,还可以用他“篡改”数据。
假定有一名为“密码”的列,要求只有经理级别的用户才能查看该列的数据,其他人查看的时候,看到的只是"****"。
实现的代码也非常简单,在该表的DrawCell事件中输入:
If User.Group =
"经理"
Then
'如果是经理
Return
'那么返回,正常显示数据
End
If
If e.Col.Name = "密码"
Then
'如果正在绘制的是密码列
e.Text = "****"
'那么用*代替原来的内容
End
IF
在窗口中将此控件的.Visible属性设置为False,或者用另一个只有**的控件遮住这个文本框,方法很多。
还可以看看:
http://www.foxtable.com/help/topics/0737.htm
谢谢 各位的帮忙,不知道是我没有表达清楚 还是你们说的我看不明白?
再重复说明一下:
如 一楼的图片 成本单价,在窗口中 如果是 财务部 的用户就显示 单价,如果不是财务部的就显示****
,
在表中好弄:
表的 drawcell 时间设置如下
Select Case e.Col.Name
Case "danjia","zonger"
If User.Group <> "财务部" Then
e.Text = "****" '则修改显示内容
End If
End Select
可是在窗口中呢?
1. 增加一个文本框TextBox5,其初始值为:"*****"
2.在窗口的AfterLoad事件中加以下代码就可以解决
If User.Group <> "财务部" Then
e.Form.Controls("TextBox9").Visible = False
e.Form.Controls("TextBox5").Visible = True
Else
e.Form.Controls("TextBox9").Visible =True
e.Form.Controls("TextBox5").Visible = True
End If