精易论坛

标题: 一个简单的禁止软件重复运行例程 [打印本页]

---

作者: 1144959379    时间: 2015-1-15 09:27
标题: 一个简单的禁止软件重复运行例程
一个简单的禁止软件重复运行例程，大神勿喷

禁止重复运行.rar

2015-1-15 09:26 上传

点击文件名下载附件

下载积分: 精币 -2 枚

1.32 KB, 下载次数: 245, 下载积分: 精币 -2 枚

---

作者: 王琦瑶    时间: 2015-1-15 09:47
我是前排

---

作者: 王琦瑶    时间: 2015-1-15 09:49
在逗我  这样也收钱?

---

作者: LoneyYong    时间: 2015-1-15 11:01
你赢了

---

作者: 晓晓馨    时间: 2015-1-15 13:30
感谢分享，支持开源。

---

作者: a944634392    时间: 2015-1-15 16:32
收下来看看，学习学习

---

作者: Ai鹿    时间: 2015-1-15 18:12
收下来看看，学习学习

---

作者: asfor78    时间: 2015-1-15 18:37
{:soso_e144:}我这么鸡汁的少年 我怎么会告诉大家精易模块里有 程序_禁止重复运行 呢

---

作者: wangyujia333    时间: 2015-1-15 18:43
收下了                     

---

作者: Alexjylt    时间: 2015-1-15 19:33
据说有很多种方法，不知道这是哪种？

---

作者: a2105123    时间: 2015-1-15 22:12
支持楼主哈。希望发布更多东西

---

作者: 流氓9    时间: 2015-1-16 00:58
==============

---

作者: 汉族    时间: 2015-1-16 01:19
我以前也搞过，给你分享我的思路吧，
------------------------------------------------------------

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕			编译后运行测试

禁止程序2次运行 (取执行文件名 ())

子程序名	返回值类型	公开	备 注
禁止程序2次运行	逻辑型		汉族—无聊之作
参数名	类 型	参考	可空	数组	备 注
程序	文本型
信息	文本型
标题	文本型

变量名	类 型	静态	数组	备 注
q	进程信息		0
w	整数型
a	整数型
j	逻辑型

清除数组 (q)
w ＝ 0
q ＝ 取系统进程列表 ()
计次循环首 (取数组成员数 (q), a)
判断 (程序 ＝ q [a].进程名称)
w ＝ w ＋ 1
如果真 (w ＝ 2)
判断 (信息 ＝ “” 且 标题 ＝ “”)
信息框 (“只能运行一个”, 0, , )
结束 ()
判断 (信息 ＝ “” 且 标题 ≠ “”)
信息框 (“只能运行一个”, 0, 标题, )
结束 ()
判断 (信息 ≠ “” 且 标题 ＝ “”)
信息框 (信息, 0, , )
结束 ()



j ＝ 真
j ＝ 假

计次循环尾 ()
返回 (j)

i支持库列表	支持库注释
eAPI	应用接口支持库

.版本 2<br /> .支持库 eAPI<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕, , , 编译后运行测试<br /> <br /> 禁止程序2次运行 (取执行文件名 ())<br /> <br /> .子程序 禁止程序2次运行, 逻辑型, , 汉族—无聊之作<br /> .参数 程序, 文本型<br /> .参数 信息, 文本型, 可空<br /> .参数 标题, 文本型, 可空<br /> .局部变量 q, 进程信息, , "0"<br /> .局部变量 w, 整数型<br /> .局部变量 a, 整数型<br /> .局部变量 j, 逻辑型<br /> <br /> 清除数组 (q)<br /> w ＝ 0<br /> q ＝ 取系统进程列表 ()<br /> .计次循环首 (取数组成员数 (q), a)<br />     .判断开始 (程序 ＝ q [a].进程名称)<br />         w ＝ w ＋ 1<br />         .如果真 (w ＝ 2)<br />             .判断开始 (信息 ＝ “” 且 标题 ＝ “”)<br />                 信息框 (“只能运行一个”, 0, , )<br />                 结束 ()<br />             .判断 (信息 ＝ “” 且 标题 ≠ “”)<br />                 信息框 (“只能运行一个”, 0, 标题, )<br />                 结束 ()<br />             .判断 (信息 ≠ “” 且 标题 ＝ “”)<br />                 信息框 (信息, 0, , )<br />                 结束 ()<br />             .默认<br /> <br />             .判断结束<br /> <br />         .如果真结束<br />         j ＝ 真<br />     .默认<br />         j ＝ 假<br />     .判断结束<br /> <br /> .计次循环尾 ()<br /> 返回 (j)

-----------------------------------------------------------------------------------

---

作者: 尔俾    时间: 2015-1-17 20:03
如果我把进程隐藏了呢

---

作者: 798924038    时间: 2015-1-20 18:05
http://bbs.eyuyan.com/read.php?tid=374583   更简单的禁止重复运行。不是互斥体更不是进程检测

---

作者: ﹏最后的拥抱へ    时间: 2015-1-21 17:37

如果我把进程隐藏了呢

---

作者: XunTr    时间: 2015-1-22 19:16
生成一个空白文件，退出时删除不就行了！

---

作者: 新手姥    时间: 2015-1-24 13:10
2个精币            

---

作者: 幽靈家族    时间: 2015-1-25 01:12
看看你这方法简单不

---

作者: 〓压寨公子〓    时间: 2015-1-28 19:43
怎么禁止的呢，下载下赖研究一下下了！！！

---

作者: sohoo    时间: 2015-2-3 02:08
好像不错，学习了

---

作者: luigiyaoqi    时间: 2015-2-4 15:43
.版本 2  ' 软件寻找C盘的Jzcf.txt文件 如果找不到 ' 就创建一个，写入内容为 1 表示已经打开 ' 如果找到了就判断里面的内容，如果是1就 ' 弹出信息框说软件已经启动，并且结束软件 ' 如果为 0 继续运行软件！ ' 启动窗口结束后就写 0 到C盘的Jzcf.txt文件 ' 这样可以保证下次软件开启时判断到的是0 ' 从而运行软件！

---

作者: xiekyle    时间: 2015-2-21 16:28
不错，学习中，正需要

---

作者: 利军埘绱    时间: 2015-4-11 17:51
下载了  这个不错！~~

---

作者: caohacker    时间: 2015-6-27 08:38
一个简单的禁止软件重复运行例程，大神勿喷

---

作者: 韩沫沫    时间: 2015-8-24 00:39
不错，学习中，正需要

---

作者: 笨蛋蛋    时间: 2016-1-15 15:17
我要给你赞！

---

作者: myselfsky    时间: 2016-4-2 16:19
谢谢，学习了！！！

---

作者: syamd29    时间: 2017-11-26 20:33
#在这里快速回复#一个简单的禁止软件重复运行例程，大神勿喷

---

作者: ytbihay    时间: 2021-12-10 16:08
如果不是正常关闭软件，好像就不太好处理

---

作者: wangzhi0421    时间: 2024-8-12 17:37
haode16666666666666666666666666

---

欢迎光临 精易论坛 (https://125.confly.eu.org/)

Powered by Discuz! X3.4