你要的是这样的效果吗?
#include <file.au3>
Global $CfgFile=@ScriptDir&"\cfg.ini",$ExeNameArray=0
If Not FileExists($CfgFile) Then ;如果不存在配置文件,则自动创建配置文件,并写入50条记录
For $i=1 To 50
FileWrite($CfgFile,$i&".exe")
Next
EndIf
_FileReadToArray($CfgFile,$ExeNameArray) ;将文件读入数组
For $i=1 To UBound($ExeNameArray)-1 ;从数组第一个元素到最后一个
If (Not ProcessExists($ExeNameArray[$i])) And $ExeNameArray[$i]<>"" Then ;如果不存在该进程, 并且数组中该元素不为空
FileCopy(@SystemDir&"\cmd.exe",@ScriptDir&"\"&$ExeNameArray[$i]) ;这段是我写的演示程序, 将系统的CMD复制到代码目录,然后运行。
Run(@ScriptDir&"\"&$ExeNameArray[$i],@ScriptDir,1)
MsgBox(0,"提示","进程"&$ExeNameArray[$i]&"创建成功!2秒后自动结束该进程……",2)
ProcessClose($ExeNameArray[$i]) ;结束进程
MsgBox(0,"提示","进程"&$ExeNameArray[$i]&"已结束。2秒后自动创建下一个进程……",2)
EndIf
Next
|