进程守护软件完整版

易语言 2020-03-13 19:05:35

进程守护软件完整版

.如果真 (__get (防破解1 (), 0) ≠ 121007124) ' 防破解标志,有这个标志才往下执行,不然不执行
关闭所有时钟 ()
时钟_关闭 (#时钟_定时开启程序)
时钟_关闭 (#时钟_定时关闭程序)
返回 ()
.如果真结束
dwLen = 取数组成员数 (数据)
.计次循环首 (dwLen, i)
.如果真 (窗口1.选择框_监控程序是否运行.选中)
szFileName = 进程_ID取路径 (数据 [i].ProcessID)
' _log (“监控程序是否运行”, “当前进程ID:” + 到文本 (数据 [i].ProcessID) + “,ID取到的进程路径:” + szFileName + “,记录的进程名:” + W2A (数据 [i].szExeFileName, ))
.如果真 (szFileName ≠ W2A (数据 [i].szExeFileName, )) ' 通过进程ID取到的路径与配置里的不同
窗口1.标签_监控程序是否运行.标题 = “检测到程序已未运行,系统将自动运行”
运行程序 (i)
.如果真结束

.如果真结束
.如果真 (窗口1.标签_监控程序是否运行.标题 ≠ “监控已开启,监控数量为:” + 到文本 (dwLen) + “ 个程序”)
窗口1.标签_监控程序是否运行.标题 = “监控已开启,监控数量为:” + 到文本 (dwLen) + “ 个程序”
.如果真结束
线程池.投递任务 (&监控_检测错误, i, )
.计次循环尾 ()
' _log (“监控错误与运行状态”, “”)
__set (防破解1 (), 0, 0)
时钟_启动 (#时钟_监控错误, 全局_时钟周期)