以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]还是权限问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=48776)
--  作者：viking
--  发布时间：2014/4/4 17:44:00
--  [求助]还是权限问题

窗口1，button1，button2

表A

关联表：表A.表B

当登陆用户不是表A的“业务负责”时，button1，button2不能使用，这个怎么写？
--  作者：Bin
--  发布时间：2014/4/4 17:46:00
--  
窗口AlterLoad

if user.name <> "业务负责" then
   e.form.controls("button1").Enabled=False
   e.form.controls("button2").Enabled=False
end if
--  作者：viking
--  发布时间：2014/4/4 18:27:00
--  
以下是引用Bin在2014-4-4 17:46:00的发言：
窗口AlterLoad
if user.name <> " 14px="14px" FONT: 14px?=" div=" div?>
   e.form.controls("button1").Enabled=False
   e.form.controls("button2").Enabled=False
 
end if

大侠我想写在这个

CurrentChanged

DataColChanged

 

这个里面。谢谢！

上边这个切换数据就失效了

[此贴子已经被作者于2014-4-4 18:37:46编辑过]
--  作者：viking
--  发布时间：2014/4/5 9:26:00
--  

顶下，大侠怎么走了啊
--  作者：viking
--  发布时间：2014/4/7 12:35:00
--  
都放假了
--  作者：有点甜
--  发布时间：2014/4/7 13:56:00
--  

 是不是这样？CurrentChanged

 

If Forms("xxx").Opened Then
    If user.Name = e.Table.Current("业务负责") Then
        Forms("xxx").Controls("button1").Enabled = True
        Forms("xxx").Controls("button2").Enabled = True
    Else
        Forms("xxx").Controls("button1").Enabled = False
        Forms("xxx").Controls("button1").Enabled = False
    End If
End If
--  作者：viking
--  发布时间：2014/4/10 10:45:00
--  
 

 

[此贴子已经被作者于2014-4-10 10:50:47编辑过]
--  作者：Bin
--  发布时间：2014/4/10 10:49:00
--  
If user.Name = e.Table.Current("业务负责") andalso e.Table.Current("订单状态")="新增订单" Then
--  作者：viking
--  发布时间：2014/4/10 10:51:00
--  

谢谢
--  作者：狐狸爸爸
--  发布时间：2014/4/10 10:52:00
--  
以下是引用viking在2014-4-10 10:45:00的发言：
但是这句好像不对
说是不是detacoleventargs成员，

如果再加个条件：当前行的“订单状态”是“新增订单”时

怎么写啊？

 

 

 

说明你代码可能写错地方了，没有写在CurrentChanged事件中。