Office中国论坛/Access中国论坛

标题: [已经解决]文本框权限设置? [打印本页]

作者: JimmyOu0707    时间: 2007-7-11 18:42
标题: [已经解决]文本框权限设置?
<>系统的用户管理权限已经做好,不同的用户可以对不同窗体进行操作。现在可不可以把有些窗体的个别文本框设成只有管理员用户才能修改(比如出货的日期,管理员写了以后,只有他才能修改)如何设置?<br>希望一点通老师和各位高手帮忙看看,谢谢(在线等。。。。。。。</P>
[此贴子已经被作者于2007-7-12 15:10:56编辑过]


作者: 一点通    时间: 2007-7-11 20:02
原理与窗体设置一样的,变通一下就行了
作者: JimmyOu0707    时间: 2007-7-11 21:13
<>有没有简单一点的例如:</P>
<>if 当前用户=管理员</P>
<>then Me![控件].lock=False</P>
<P>else Me![控件].lock=Ture</P>
<P>这样的代码j具体怎么样写啊?写在那里合适?希望老师解答一下。。谢谢</P>
[此贴子已经被作者于2007-7-11 13:51:25编辑过]


作者: 一点通    时间: 2007-7-11 21:45
<>语句放在窗体的加载事件中</P>
<>if 当前用户&lt;&gt;管理员 then</P>
<>   me.控件1.Enabled = 0</P>
<P>   me.控件2.Enabled = 0</P>
<P>   .........</P>
<P>end if</P>
作者: JimmyOu0707    时间: 2007-7-11 21:52
<>一点通老师,我试过了,还是不行啊。。按你说的用户0000应该可以修改,用户0001是锁住的啊?</P>
<>麻烦你看下附件的主机信息窗体,是那里错啦。。(用户编号:0000 密码:123456 用户编号:0001 密码:123)<br>                      </P>
[此贴子已经被作者于2007-7-12 11:07:25编辑过]


作者: 一点通    时间: 2007-7-11 23:41
上传示例时不要将整个系统发上来,这样会增加回复者的难度,应将示例简化
作者: JimmyOu0707    时间: 2007-7-11 23:58
<>哦,我已经将没有必要的窗体都删了,难道没有删除吗?</P>
<>不好意思,那麻烦你只看看主机窗体就可以了。(比较急,在线等)</P>
作者: 一点通    时间: 2007-7-12 00:55
难道你不可用模拟的示例?
作者: JimmyOu0707    时间: 2007-7-12 16:15
<br>好,我重新给个你试一下。再麻烦你看一下 谢谢(在线等) 用户:0000 密码:123   用户:0001 密码:123
[此贴子已经被作者于2007-7-12 11:59:37编辑过]


作者: JimmyOu0707    时间: 2007-7-12 20:01
<br>[attach]25332[/attach]<br>
[此贴子已经被作者于2007-7-12 14:41:49编辑过]


作者: hi-wzj    时间: 2007-7-12 23:50
<>If UserID = "0000" Then<BR>   Me.Text43.Enabled = True<BR>Else<BR>  Me.Text43.Enabled = False<BR>End If<BR></P>
<>问题出在:</P>
<>1、用户id在公用模块所设置的变量名是“userid”。</P>
<P>2、窗体“产出期”的控件名称为:Text43</P>
<P>3、True和False用相反了。</P>
作者: JimmyOu0707    时间: 2007-7-13 00:13
<><FONT color=#000000>谢谢<STRONG><FONT face=Verdana>hi-wzj版主,现在可以了,真的很感激!!!!!!</FONT></STRONG></FONT></P>
作者: 13555609005    时间: 2008-7-26 10:56
学习吓
作者: coolleaf    时间: 2008-11-11 12:15
这么多附件下哪个啊。
作者: DSYOU    时间: 2008-11-12 09:47
很好![:30]
作者: snddzxb    时间: 2008-11-12 11:56
学习一下
作者: txtwgr    时间: 2018-6-27 17:57
做的已经不错了,继续加油





欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3