|
Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Скриптовые языки администрирования Windows » VBS/WSH/JS - монитор процесса и завершение |
|
VBS/WSH/JS - монитор процесса и завершение
|
Новый участник Сообщения: 1 |
Добрый день!
Помогите разобраться со скриптом. Цель - скрипт будет висеть в автозагрузке. Постоянно мониторить процесс (за пример взял калькулятор). Если калькулятор запущен, то вырубать его. Сам по себе вроде как работает, но разово. (т.е. когда сам его запускаю он вырубает процесс и все. но когда в автозагрузке ничего не происходит) подскажите в чем проблема. Я, наверно, запарил в Do Loop Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\CIMV2") Set colServices = objWMIService.ExecQuery _ ("SELECT * FROM Win32_Process WHERE Name = 'calc.exe'") Do Running = False Set colItems = objWMIService.ExecQuery("Select * from Win32_Process") For Each objItem in colItems If objItem.Name = "calc.exe" Then Running = True Exit For End If Next If Not Running Then WScript.Sleep 2000 Loop while Not Running Dim oShell : Set oShell = CreateObject("WScript.Shell") oShell.Run "taskkill /im calc.exe", , True End If |
|
Отправлено: 12:15, 11-07-2016 |
Ветеран Сообщения: 547
|
Профиль | Сайт | Отправить PM | Цитировать d_dwen, то что он работает вообще видно?
|
------- Отправлено: 13:15, 11-07-2016 | #2 |
Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети. Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля. |
Забанен Сообщения: 793
|
Вообще, довольно странно получать список процессов через WMI, а грохать процесс с помощью taskkill. Во-вторых, что подразумевается под автозагрузкой: Run в реестре, задача в планировщике или просто ярлык в папке "Автозагрузка"?
|
Отправлено: 13:59, 11-07-2016 | #3 |
Ветеран Сообщения: 2728
|
Профиль | Отправить PM | Цитировать
После запуска (в том числе и в папке "автозагрузка") убить этот скрипт можно только в диспетчере задач. Если запущено несколько калькуляторов, будут убиты все.
|
------- Последний раз редактировалось megaloman, 11-07-2016 в 16:16. Отправлено: 16:06, 11-07-2016 | #4 |
Ветеран Сообщения: 27449
|
Профиль | Отправить PM | Цитировать |
|
Отправлено: 18:42, 11-07-2016 | #5 |
![]() |
Участник сейчас на форуме |
![]() |
Участник вне форума |
![]() |
Автор темы |
![]() |
Сообщение прикреплено |
| |||||
Название темы | Автор | Информация о форуме | Ответов | Последнее сообщение | |
Службы - принудительное завершение процесса | Pogrebnyuk | Microsoft Windows 2000/XP | 2 | 31-01-2013 08:54 | |
[решено] Автоматическое завершение процесса. | ГрМакс | Microsoft Windows NT/2000/2003 | 7 | 07-10-2012 18:50 | |
Любой язык - [решено] Завершение процесса по условию | Butunin Klim | Скриптовые языки администрирования Windows | 1 | 15-08-2011 15:17 | |
VBS/WSH/JS - [решено] Завершение процесса | d_u | Скриптовые языки администрирования Windows | 7 | 26-07-2010 17:45 | |
Разное - Неожиданное завершение системного процесса | Uzer-pb | Хочу все знать | 1 | 30-06-2010 11:23 |
|