以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  帮忙代码简化一下,仅限三个人有权限修改  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=87252)

--  作者:zoyong
--  发布时间:2016/7/6 16:23:00
--  帮忙代码简化一下,仅限三个人有权限修改
If _Username = "A1" OrElse _UserName = "A2" OrElse _UserName = "A3" Then
    Syscmd.Row.UnLock()
    e.Form.Controls("撤销").Enabled=True
    MessageBox.show("你无修改权限!")
End If

--  作者:大红袍
--  发布时间:2016/7/7 0:36:00
--  
If _Username = "A1" OrElse _UserName = "A2" OrElse _UserName = "A3" Then
    Syscmd.Row.UnLock()
    e.Form.Controls("撤销").Enabled=True
Else
    MessageBox.show("你无修改权限!")
End If