我正在编写一个运行一些程序的批处理脚本。当每个程序完成它正在做的事情时,它会等待用户关闭它,继续下一个程序,或者在超时数秒后被taskkill关闭。如果我认为主脚本是main,程序是TASK,计时器是KILLER。MAIN在(大约)同一时间启动TASK和KILLER。TASK做它应该做的事,杀手在杀死TASK之前等待600秒。但是,如果TASK被用户关闭,它应该杀死KILLER并返回MAIN,而不需要用户交互。然而,使用ping或超时,我仍然需要等待计时器到期,然后批处理才会真正关闭。我不想让我的桌面上到处都是什么都不会做的命令窗口。有办法解决这个问题吗?
您可以使用类似的东西
@echo off
setlocal enableextensions disabledelayedexpansion
start "" task.exe
call :timeoutProcess "task.exe" 300
start "" task.exe
call :timeoutProcess "task.exe" 300
exit /b
:timeoutProcess process timeout [leave]
rem process = name of process to monitor
rem timeout = timeout in seconds to wait for process to end
rem leave = 1 if process should not be killed on timeout
for /l %%t in (1 1 %~2) do (
timeout /t 1 >nul
tasklist | find /i "%~1" >nul || exit /b 0
)
if not "%~3"=="1" taskkill /f /im "%~1" >nul 2>nul
if %errorlevel% equ 128 ( exit /b 0 ) else ( exit /b 1 )
超时逻辑移动到一个子例程,该子例程将等待进程结束或达到超时。
这里有一个vbs脚本。
它等待程序退出,看看它是否是记事本,然后重新启动记事本(如果是)。将Win32_ProcessStopTrace
更改为Win32_ProcessStartTrace
表示程序启动,或将Win32_ProcessTrace
表示所有启动和停止。
控制台脚本是这样启动的。GUI脚本只是直接执行脚本。GUI脚本是不可见的。
cscript "c:somefolderscript.vbs"
要在脚本中等待,请使用wscript.sleep 600000
(毫秒)。
Set WshShell = WScript.CreateObject("WScript.Shell")
Set objWMIService = GetObject("winmgmts:\.rootCIMV2")
Set objEvents = objWMIService.ExecNotificationQuery _
("SELECT * FROM Win32_ProcessStopTrace")
Do
Set objReceivedEvent = objEvents.NextEvent
wscript.echo objReceivedEvent.ProcessName
If lcase(objReceivedEvent.ProcessName) = lcase("Notepad.exe") then
WScript.echo "Process exited with exit code " & objReceivedEvent.ExitStatus
WshShell.Run "c:Windowsnotepad.exe", 1, false
End If
Loop
这就是如何启动一个不可见的命令窗口。
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "cmd /k dir c:windows*.*", 0, false