Автор Виктор Митков задал вопрос в разделе Другие языки и технологии
Есть вопрос по vbs (или как вариант bat) и получил лучший ответ
Ответ от ...[гуру]
Имхо проще так (я на блокноте проверял) :
%windir%system32 asklist /NH /FI "IMAGENAME eq notepad.exe"|findstr notepad.exe
if %ERRORLEVEL%==0 start script.vbs
Вывод от tasklist отправляется через | для findstr который ищет там эту строку с названием процесса. Если findstr нашел строку он устанавливает ERRORLEVEL=0, если нет = 1
P.S: Если нужно на vbs - решаемо - пишите на почту - могу набросать и на нём.
P.P.S: Так зациклите.. .
:loop
%windir%system32 asklist /NH /FI "IMAGENAME eq notepad.exe"|findstr notepad.exe
if %ERRORLEVEL%==0 (
start script.vbs
exit
)
ping 127.0.0.1 -n 5 >nul
goto loop
-5 это число секунд между проверками. а то всё время ломиться не очень хорошо.
Можно через WMI получать список процессов, но это не шибко быстро, хотя если проверять, каждые, скажем 3 секунды - не критично.
Set objWMIService = GetObject("winmgmts:.
ootcimv2")
Do
Running = False
Set colItems = objWMIService.ExecQuery("Select * from Win32_Process")
For Each objItem in colItems
If objItem.Name = "firefox.exe" Then
Running = True
Exit For
End If
Next
If Not Running Then
WScript.Sleep 3000
End If
Loop While Not Running
MsgBox "Red fox jumps over lazy donkey"