建议命令:程序_禁止重复运行 增加一个参数

小爬虫

增加一个:是否前端显示程序 逻辑型参数,功能:如果禁止重复运行的程序已经在运行了,那么通过此参数来确定是不是让已运行程序到前台显示

  

子程序名	返回值类型	公开	备 注
程序_禁止重复运行
参数名	类 型	参考	可空	数组	备 注
标识文本	文本型				尽量输复杂一点的文本
是否弹出信息框提示	逻辑型				默认为假,不弹出提示;
消息框提示文本	文本型				第二个参数设置为假,该参数则无效
消息框提示图标	整数型				默认为信息图标，如：#信息图标
是否前端显示程序	逻辑型				如果已重复运行,是否将程序在前端显示

如果真 (标识文本 ＝ “”)
标识文本 ＝ “精易论坛 bbs.125.la”

如果真 (OpenEventA (2031619, 假, 标识文本) ≠ 0)
如果真 (是否弹出信息框提示)
如果真 (是否为空 (消息框提示文本))
消息框提示文本 ＝ “对不起,该进程已打开!”
提示框 (消息框提示文本, 消息框提示图标, “友情提醒:”)

如果真 (是否前端显示程序)
窗口_强制显示 (进程_名取句柄 (取执行文件名 ()))

结束 ()
CreateEvent (0, 假, 假, 标识文本)

.版本 2<br /> <br /> .子程序 程序_禁止重复运行, , 公开<br /> .参数 标识文本, 文本型, 可空, 尽量输复杂一点的文本<br /> .参数 是否弹出信息框提示, 逻辑型, 可空, 默认为假,不弹出提示;<br /> .参数 消息框提示文本, 文本型, 可空, 第二个参数设置为假,该参数则无效<br /> .参数 消息框提示图标, 整数型, 可空, 默认为信息图标，如：#信息图标<br /> .参数 是否前端显示程序, 逻辑型, 可空, 如果已重复运行,是否将程序在前端显示<br /> <br /> .如果真 (标识文本 ＝ “”)<br />     标识文本 ＝ “精易论坛 bbs.125.la”<br /> .如果真结束<br /> <br /> .如果真 (OpenEventA (2031619, 假, 标识文本) ≠ 0)<br />     .如果真 (是否弹出信息框提示)<br />         .如果真 (是否为空 (消息框提示文本))<br />             消息框提示文本 ＝ “对不起,该进程已打开!”<br />         .如果真结束<br />         提示框 (消息框提示文本, 消息框提示图标, “友情提醒:”)<br />     .如果真结束<br /> <br />     .如果真 (是否前端显示程序)<br />         窗口_强制显示 (进程_名取句柄 (取执行文件名 ()))<br />     .如果真结束<br /> <br />     结束 ()<br /> .如果真结束<br /> CreateEvent (0, 假, 假, 标识文本)