Цитата Mogarych:
|
Сделайте на рабочем столе два батника »
|
Похоже "utorrent-2.2.0" присутствует постоянно, поэтому хватит одного командного файла, причем не батника (будет недовольство висящим CMD - окном), а, например, vbs.
1. Убиваем "utorrent-2.2.0"
2. Запускаем "TunnelBear" и ждем его завершения.
3. Запускаем "utorrent-2.2.0"
Вот вариант. Так как у меня нет указанных программ, я их для отладки подменил другими, которые есть у всех.
Код:
utorrent = "C:\Windows\notepad.exe"
TunnelBear = "C:\Windows\System32\calc.exe"
Exe = CreateObject("Scripting.FileSystemObject").GetFileName(utorrent)
SQuery = "Select *From Win32_Process Where Name=" + """" + Exe + """"
Do
Set Processes = GetObject("winMgmts:").ExecQuery(SQuery)
For Each Process In Processes
Process.Terminate
Next
Loop While Processes.Count > 0
With CreateObject("WScript.Shell")
Ret = .Run("""" + TunnelBear + """", 1, True)
Ret = .Run("""" + utorrent + """", 1, False)
End With
Естественно, для реальной работы надо прописать свои программы.
Если изначально utorrent не присутствовал, то при запуске скрипта TunnelBear запустится, и, по окончанию, запустится utorrent
