Тема: VBS : «calc.exe» - должен умереть
Задача:
не допустить (хочется сказать «любой ценой») запуск «calc.exe»
Условие:
Решение должно быть простое и гениальное .. ведь эту тему не раз подымали
Решение:
Proc_Name = "calc.exe"
Set oWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2")
Set oMonitoredProc = oWMIService.ExecNotificationQuery("select * from __instancecreationevent " & " within 1 where TargetInstance isa 'Win32_Process'")
Do While True
Set oLatestProcess = oMonitoredProc.NextEvent
If oLatestProcess.TargetInstance.Name = Proc_Name Then oLatestProcess.TargetInstance.Terminate
LoopВопросы:
Приложение сначала запускается, потом закрывается.
Для моих целей сойдет, но хотелось бы закрыть это вопрос, чую, не раз понадобится.
Размышления:
Может, есть вариант не допустить запуск приложения (exe, cmd…), проанализировать его (пути запуска, ключи.. дочерние процесы) , и решить надо ли его запускать и как его запускать
Точно знаю, в винде такой алгоритм применяется, как пример - блокирование или разрешение приложений (реестр)….
Возможно ли это вообще через VBS?
Искать библиотеки , АПИ .. подскажите правильное направление
В одной шелке встречал что-то подобное там даже контрольную сумм файлов подбивали (параноики чтоли? .. хотя может их просто это все достало .. ), у меня же проблема что шелку ставить нельзя, юзеры(бухи, и другие импы) не понимают .. им все кнопочку пуск подавай
?
.
. Спасибо, что напомнили.
