以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]如何指定用户设置关闭项目密码  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=69505)
--  作者：qq505069142
--  发布时间：2015/6/6 11:01:00
--  [求助]如何指定用户设置关闭项目密码
如何设置用户abc在关闭项目的时候弹出窗口输入密码，输入正确才能关闭项目，其他用户不受此限制
--  作者：Bin
--  发布时间：2015/6/6 11:20:00
--  
http://www.foxtable.com/help/topics/2435.htm

在BeforeCloseProject 事件处理
--  作者：qq505069142
--  发布时间：2015/6/6 12:42:00
--  

  

 Dim pwd As String
    If InputPassWord(pwd,"提示","请输入密码:") Then
        If pwd<>"999" Then
            e.Cancel=True
        End If
    End If


但是点击取消还是会退出项目

 

还有请问怎么指定某用户才需要输密码？

[此贴子已经被作者于2015/6/6 12:42:33编辑过]
--  作者：Bin
--  发布时间：2015/6/6 12:43:00
--  
Dim pwd As String
If InputPassWord(pwd,"提示","请输入密码:") Then
End If
If pwd<>"999" Then
      e.Cancel=True
End If
--  作者：qq505069142
--  发布时间：2015/6/6 13:05:00
--  

怎么指定某用户才需要输密码？

 

[此贴子已经被作者于2015/6/6 18:42:22编辑过]