Установить wsh = CreateObject ("Wscript.Shell")

wsh.Run "calc.exe", 1

Set Processes = GetObject («winmgmts:»). InstancesOf («Win32_Process»)
Для каждого процесса в процессах
Выберите случай LCase (Process.Name)
Case «calc.exe»
Process.Terminate (1)