精易模块 进程_守护 不好使返回假

彗星爱地球

测试9.1.5版本的模块可以用，10开始都不可以了直接返回假
还有程序重启也不会重启

geshenggang4

云上科技靓 发表于 2022-6-18 11:37
专门去看了下 原来版本的守护程序 发现有些问题，自己按需求优化了下
原来的问题：
1、无法自定义间隔时间  ...

少了EC文件

JYYeah

看看！！！！！

hlswuwu

不错，学习了

云上科技靓

专门去看了下 原来版本的守护程序 发现有些问题，自己按需求优化了下
原来的问题：
1、无法自定义间隔时间 默认好像是1秒检测一次；
2、取文件路径 如果是软件本身加 守护，还要写文件路径 就比较麻烦， 用了“取执行文件名 ()”代替；
3、原来的守护 如果是程序自身守护 会无限增加 守护程序，重启一次 就会增加一个守护程序，比较占内存；

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
守护状态	文本型

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

守护状态 ＝ 读配置项 (取运行目录 () ＋ “\config.ini”, “守护”, “状态”, )
判断 (守护状态 ＝ “1”)

线程守护 ()

线程_启动 (&统计)

子程序名	返回值类型	公开	备 注
统计

变量名	类 型	静态	数组	备 注
i	整数型

计次循环首 (1000, i)
标签1.标题 ＝ 到文本 (i)
程序_延时 (100)
计次循环尾 ()
结束 ()

子程序名	返回值类型	公开	备 注
线程守护

守护_进程_优化版 (取运行目录 () ＋ “\” ＋ 取执行文件名 (), 真, 10000)
写配置项 (取运行目录 () ＋ “\config.ini”, “守护”, “状态”, “1”)

子程序名	返回值类型	公开	备 注
_按钮1_被单击

写配置项 (取运行目录 () ＋ “\config.ini”, “守护”, “状态”, “0”)
计次循环首 (10, )
进程_结束1 (“wscript.exe”)
程序_延时 (500)
计次循环尾 ()

子程序名	返回值类型	公开	备 注
_按钮2_被单击

线程_启动 (&线程守护)

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 守护状态, 文本型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 守护状态 ＝ 读配置项 (取运行目录 () ＋ “\config.ini”, “守护”, “状态”, )<br /> <br /> .判断开始 (守护状态 ＝ “1”)<br /> <br /> .默认<br />     线程守护 ()<br /> .判断结束<br /> <br /> 线程_启动 (&统计)<br /> <br /> .子程序 统计<br /> .局部变量 i, 整数型<br /> <br /> .计次循环首 (1000, i)<br />     标签1.标题 ＝ 到文本 (i)<br />     程序_延时 (100)<br /> .计次循环尾 ()<br /> 结束 ()<br /> <br /> .子程序 线程守护<br /> <br /> 守护_进程_优化版 (取运行目录 () ＋ “\” ＋ 取执行文件名 (), 真, 10000)<br /> 写配置项 (取运行目录 () ＋ “\config.ini”, “守护”, “状态”, “1”)<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 写配置项 (取运行目录 () ＋ “\config.ini”, “守护”, “状态”, “0”)<br /> .计次循环首 (10, )<br />     进程_结束1 (“wscript.exe”)<br />     程序_延时 (500)<br /> .计次循环尾 ()<br /> <br /> .子程序 _按钮2_被单击<br /> <br /> 线程_启动 (&线程守护)

云上科技靓

专门去看了下 原来版本的守护程序 发现有些问题，自己按需求优化了下
原来的问题：
1、无法自定义间隔时间 默认好像是1秒检测一次；
2、取文件路径 如果是软件本身加 守护，还要写文件路径 就比较麻烦， 用了“取执行文件名 ()”代替；
3、原来的守护 如果是程序自身守护 会无限增加 守护程序，重启一次 就会增加一个守护程序，比较占内存；

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
守护状态	文本型

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

守护状态 ＝ 读配置项 (取运行目录 () ＋ “\config.ini”, “守护”, “状态”, )
判断 (守护状态 ＝ “1”)

线程守护 ()

线程_启动 (&统计)

子程序名	返回值类型	公开	备 注
统计

变量名	类 型	静态	数组	备 注
i	整数型

计次循环首 (1000, i)
标签1.标题 ＝ 到文本 (i)
程序_延时 (100)
计次循环尾 ()
结束 ()

子程序名	返回值类型	公开	备 注
线程守护

守护_进程_优化版 (取运行目录 () ＋ “\” ＋ 取执行文件名 (), 真, 10000)
写配置项 (取运行目录 () ＋ “\config.ini”, “守护”, “状态”, “1”)

子程序名	返回值类型	公开	备 注
_按钮1_被单击

写配置项 (取运行目录 () ＋ “\config.ini”, “守护”, “状态”, “0”)
计次循环首 (10, )
进程_结束1 (“wscript.exe”)
程序_延时 (500)
计次循环尾 ()

子程序名	返回值类型	公开	备 注
_按钮2_被单击

线程_启动 (&线程守护)

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 守护状态, 文本型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 守护状态 ＝ 读配置项 (取运行目录 () ＋ “\config.ini”, “守护”, “状态”, )<br /> <br /> .判断开始 (守护状态 ＝ “1”)<br /> <br /> .默认<br />     线程守护 ()<br /> .判断结束<br /> <br /> 线程_启动 (&统计)<br /> <br /> .子程序 统计<br /> .局部变量 i, 整数型<br /> <br /> .计次循环首 (1000, i)<br />     标签1.标题 ＝ 到文本 (i)<br />     程序_延时 (100)<br /> .计次循环尾 ()<br /> 结束 ()<br /> <br /> .子程序 线程守护<br /> <br /> 守护_进程_优化版 (取运行目录 () ＋ “\” ＋ 取执行文件名 (), 真, 10000)<br /> 写配置项 (取运行目录 () ＋ “\config.ini”, “守护”, “状态”, “1”)<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 写配置项 (取运行目录 () ＋ “\config.ini”, “守护”, “状态”, “0”)<br /> .计次循环首 (10, )<br />     进程_结束1 (“wscript.exe”)<br />     程序_延时 (500)<br /> .计次循环尾 ()<br /> <br /> .子程序 _按钮2_被单击<br /> <br /> 线程_启动 (&线程守护)

850536360

dwRet ＝ ShellExecuteW (#NULL, {  }, szPath, {  }, {  }, #SW_SHOW)

原因：
第二个参数{}并不等价传NULL;

修复建议：
方案1.  修改参数为整数型，传入NULL;
方案2.  显式传入“open”，编码_Ansi到Unicode (“open”, );