| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 736 人关注过本帖
标题:怎么做到生成的EXE文件不能多开?
取消只看楼主 加入收藏
b13690976754
Rank: 1
等 级:新手上路
威 望:2
帖 子:835
专家分:7
注 册:2006-11-9
结帖率:100%
收藏
 问题点数:0 回复次数:2 
怎么做到生成的EXE文件不能多开?
一般生成的可执行文件 你开几个就开几个 怎么做到 只能打开一个 如果多开 就显示 当前打开的
搜索更多相关主题的帖子: EXE 文件 
2007-03-16 21:16
b13690976754
Rank: 1
等 级:新手上路
威 望:2
帖 子:835
专家分:7
注 册:2006-11-9
收藏
得分:0 
以下是引用Joforn在2007-3-16 22:18:08的发言:
Private Sub Form_Load()
If App.PrevInstance Then
MsgBox "对不起,你已经打开了一个" & App.EXEName & "程序,本程序不能重复运行!", vbCritical, Me.Caption
Unload Me
End If
End Sub

就这样??不行哦!


If Dir(\"alive\") <> \"\" And Dir(\"ideal\") <> \" Then Print \"strive\" End If
2007-03-17 11:48
b13690976754
Rank: 1
等 级:新手上路
威 望:2
帖 子:835
专家分:7
注 册:2006-11-9
收藏
得分:0 
以下是引用purana在2007-3-17 13:01:38的发言:
代码是可以的..
当你生成了.exe之后..你运行第一次程序..会正常运行..不要关程序..再运行一次..就会提示你已经运行了.

单单一个简单程序 就可以 如果加到一个程序的LOAD 里面就没有用了


If Dir(\"alive\") <> \"\" And Dir(\"ideal\") <> \" Then Print \"strive\" End If
2007-03-20 21:38
快速回复:怎么做到生成的EXE文件不能多开?
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.016074 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved