yatv2000 发表于 2010-7-18 23:23:38

AU3无截面运行EXE文件

麻烦那位大哥帮我写个AU3无截面运行EXE文件的代码。如。运行该文件。就依次运行1.exe。完了以后运行2.exe。3.exe 4.exe D：\5.exe依次往下运行，谢谢

afan 发表于 2010-7-18 23:28:25

$i = 1
While 1
        $File = $i & '.exe'
        If FileExists($File) Then
                RunWait($File)
        Else
                Exit
        EndIf
WEnd

zcx880517 发表于 2010-7-19 22:30:34

路过，，学习下。。

dnvplj 发表于 2010-7-19 22:49:48

学习，学习。

xsjtxy 发表于 2010-7-20 10:25:06

本帖最后由 xsjtxy 于 2010-7-20 10:28 编辑

可以运行无限个。
$var = IniReadSection(@ScriptDir&"\run.ini", "名称=路径")
If @error Then
IniWrite(@ScriptDir&"\run.ini", "名称=路径", "第一个", "d:\第一个.exe")
IniWrite(@ScriptDir&"\run.ini", "名称=路径", "第二个", "d:\第二个.exe")
IniWrite(@ScriptDir&"\run.ini", "名称=路径", "第三个", "d:\第三个.exe")
IniWrite(@ScriptDir&"\run.ini", "名称=路径", "第四个", "d:\第四个.exe")
IniWrite(@ScriptDir&"\run.ini", "名称=路径", "第X个", "d:\第X个.exe")
IniWrite(@ScriptDir&"\run.ini", "名称=路径", "6", "d:\6.exe")
IniWrite(@ScriptDir&"\run.ini", "名称=路径", "7", "d:\7.exe")
IniWrite(@ScriptDir&"\run.ini", "名称=路径", "8", "d:\8.exe")
IniWrite(@ScriptDir&"\run.ini", "名称=路径", "9", "d:\9.exe")
IniWrite(@ScriptDir&"\run.ini", "名称=路径", "10", "d:\10.exe")
IniWrite(@ScriptDir&"\run.ini", "名称=路径", "11", "d:\11.exe")
IniWrite(@ScriptDir&"\run.ini", "名称=路径", "12", "d:\12.exe")
IniWrite(@ScriptDir&"\run.ini", "名称=路径", "13", "d:\13.exe")
ShellExecute(@ScriptDir&"\run.ini")
exit
Else
    For $i = 1 To $var
      ;;;;run($var[$i],"",@SW_HIDE)         ;;;运行然后继续脚本
      runwait($var[$i],"",@SW_HIDE)         ;;;运行。等待进程结束。再继续脚本。
        sleep(10)
    Next
EndIf
页: [1]
查看完整版本: AU3无截面运行EXE文件