Foxtable(狐表)用户栏目专家坐堂 → [讨论]发布后的软件如何禁止多次启动


  共有2429人关注过本帖树形打印复制链接

主题:[讨论]发布后的软件如何禁止多次启动

帅哥哟,离线,有人找我吗?
静听枫雨
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:255 积分:2152 威望:0 精华:0 注册:2013/6/8 22:41:00
[讨论]发布后的软件如何禁止多次启动  发帖心情 Post By:2017/5/26 13:12:00 [只看该作者]

现在发布后的软件,打开登录后,还可以双击运行程序重新打开登录窗口。就像QQ一样。可以多次启动。如何禁止它呢

 回到顶部
帅哥哟,离线,有人找我吗?
天下无光
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:45 积分:439 威望:0 精华:0 注册:2011/4/24 10:32:00
  发帖心情 Post By:2017/5/26 13:23:00 [只看该作者]

在BeforeOpenProject增加代码

'禁止多开
static mu As system.threading.mutex
Dim sucess As Boolean = False
mu=new system.threading.mutex(True,"XXXXXXXX",sucess) ‘XXXXXXXX是你的程序名称
If not sucess Then
    MessageBox.show("系统已经在运行,可退出后重新登录!","提示",MessageBoxButtons.OK,messageboxicon.Information)
    e.cancel=True
End  If

 回到顶部
帅哥哟,离线,有人找我吗?
静听枫雨
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:255 积分:2152 威望:0 精华:0 注册:2013/6/8 22:41:00
  发帖心情 Post By:2017/5/26 13:27:00 [只看该作者]

谢谢!! 但出现个问题,弹出的提示框 在启动图片的下层。根本看不到提示框 !! 能不能移到上一层。

[此贴子已经被作者于2017/5/26 13:31:32编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:112380 积分:572162 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/5/26 14:35:00 [只看该作者]


 回到顶部