Скрипт отключающий какой-либо процесс как только человек открывает диспетчер задач(таскмгр.ехе)

@tamago4a · Регистрация: 22.05.2017

Студворк — интернет-сервис помощи студентам

Нужен скрипт отключающий какой-либо процесс как только пользователь открывает диспетчер задач. Как только закрывает диспетчер задач, скрипт снова запускает какой-либо процесс. Заранее благодарен.

greg zakharov · 18.06.2017, 21:03

Такие вещи на форуме рассматриваются как [около]малварьные, если не следует подробного описания для каких целей это будет пригодно. Это во-первых. Во-вторых, лично такую вещь если и взялся бы реализовывать, то только за $.

@v_svitere · 19.06.2017, 10:44

tamago4a,
Проще просто скрывать процесс в диспетчере задач. Но дело в том, что работающие процессы можно посмотреть не только диспетчером, поэтому придеться скрывать их везде.
Вот тут поднимался сей вопрос.
Скрыть процесс из диспетчера задач от пользователя

@tamago4a · 22.06.2017, 21:19 **[ТС]**

это задание только часть от полного скрипта. если я опишу вам куда-нибудь(скайп, вк) всё задание, вы определитесь в цене?

Dragokas · 25.06.2017, 17:38

greg zakharov, ага, недавно скидывали мне на анализ такой код в составе майнера.

@web567 · 12.09.2019, 14:16

Вот скрипт отключающий какой-либо процесс как только человек открывает диспетчер задач(таскмгр.ехе)

Sub Run(ByVal sFile)
Dim shell
Set shell = CreateObject("WScript.Shell")
shell.Run Chr(34) & sFile & Chr(34), 1, false
Set shell = Nothing
End Sub
Run "C:\Windows\System32\taskmgr.exe"

WhatKill = "memreduct.exe / Название программы"

Set WMI = GetObject("winMgmts:")
iSQL = "Select * From Win32_Process Where Name=""" + WhatKill + """"
Set Proc = WMI.ExecQuery(iSQL)

For Each iProc In Proc
iProc.Terminate
Next

Добавлено через 3 минуты
Вот скрипт отключающий какой-либо процесс как только человек открывает диспетчер задач(таскмгр.ехе) - С ВЫДАЧЕЙ СООБЩЕНИЯ!

Sub Run(ByVal sFile)
Dim shell
Set shell = CreateObject("WScript.Shell")
shell.Run Chr(34) & sFile & Chr(34), 1, false
Set shell = Nothing
End Sub
Run "C:\Windows\System32\taskmgr.exe"

WhatKill = "memreduct.exe / Название программы"

Set WMI = GetObject("winMgmts:")
iSQL = "Select * From Win32_Process Where Name=""" + WhatKill + """"
Set Proc = WMI.ExecQuery(iSQL)

For Each iProc In Proc
iProc.Terminate
Next
' Сообщение
on error resume next
Set S = CreateObject("Wscript.Shell")
set FSO=createobject("scripting.filesystemob ject")

S.popup "Процесс MemReduct успешно завершен!",0, "Сообщение",0+0

Новые блоги и статьи Все статьи Все блоги /
Отчёт о затраченных материалах за определенный период с макетом печатной формы Maks 21.04.2026 Отчёт из решения ниже размещён в конфигурации КА2. Задача: разработка отчёта по затраченным материалам за определённый период, с возможностью вывода печатной формы отчёта с шапкой и подвалом. В. . .	Отчёт о спецтехнике находящейся в ремонте Maks 20.04.2026 Отчёт из решения ниже размещен в конфигурации КА2. Задача: отобразить спецтехнику, которая на данный момент находится в ремонте. Есть нетиповой документ "Заявка на ремонт спецтехники" который. . .	Памятка для бота и "визитка" для читателей "Semantic Universe Layer (Слой семантической вселенной)" Hrethgir 19.04.2026 Сгенерировано для краткого описания по случаю сборки и компиляции скелета серверного приложения. И пусть после этого скажут, что статьи сгенерированные AI - туфта и не интересно. И это не реклама -. . .	Запрет удаления строк ТЧ документа при определённом условии Maks 19.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "Аккумуляторы", разработанного в конфигурации КА2. У данного документа есть ТЧ, в которой в зависимости от прав доступа. . .
Модель заражения группы наркоманов alhaos 17.04.2026 Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .	Мысли в слух. Про "навсегда". kumehtar 16.04.2026 Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .	My Business CRM MaGz GoLd 16.04.2026 Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .	Знаешь почему 90% людей редко бывают счастливыми? kumehtar 14.04.2026 Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.

@tamago4a 3 / 3 / 0 Регистрация: 22.05.2017 Сообщений: 111

	VBS Скрипт отключающий какой-либо процесс как только человек открывает диспетчер задач(таскмгр.ехе) 17.06.2017, 19:45. Показов 7114. Ответов 5 Метки нет (Все метки) Нужен скрипт отключающий какой-либо процесс как только пользователь открывает диспетчер задач. Как только закрывает диспетчер задач, скрипт снова запускает какой-либо процесс. Заранее благодарен. 0

greg zakharov Покинул форум 3701 / 1484 / 355 Регистрация: 07.05.2015 Сообщений: 2,903
	18.06.2017, 21:03
	Такие вещи на форуме рассматриваются как [около]малварьные, если не следует подробного описания для каких целей это будет пригодно. Это во-первых. Во-вторых, лично такую вещь если и взялся бы реализовывать, то только за $. 0

@v_svitere 774 / 423 / 137 Регистрация: 03.06.2009 Сообщений: 1,223 Записей в блоге: 4
	19.06.2017, 10:44
	tamago4a, Проще просто скрывать процесс в диспетчере задач. Но дело в том, что работающие процессы можно посмотреть не только диспетчером, поэтому придеться скрывать их везде. Вот тут поднимался сей вопрос. Скрыть процесс из диспетчера задач от пользователя 0

@tamago4a 3 / 3 / 0 Регистрация: 22.05.2017 Сообщений: 111
	22.06.2017, 21:19 [ТС]
	это задание только часть от полного скрипта. если я опишу вам куда-нибудь(скайп, вк) всё задание, вы определитесь в цене? 0

Dragokas 18033 / 7736 / 892 Регистрация: 25.12.2011 Сообщений: 11,502 Записей в блоге: 16
	25.06.2017, 17:38
	greg zakharov, ага, недавно скидывали мне на анализ такой код в составе майнера. 0

@web567 0 / 0 / 0 Регистрация: 12.09.2019 Сообщений: 1
	12.09.2019, 14:16
	Вот скрипт отключающий какой-либо процесс как только человек открывает диспетчер задач(таскмгр.ехе) Sub Run(ByVal sFile) Dim shell Set shell = CreateObject("WScript.Shell") shell.Run Chr(34) & sFile & Chr(34), 1, false Set shell = Nothing End Sub Run "C:\Windows\System32\taskmgr.exe" WhatKill = "memreduct.exe / Название программы" Set WMI = GetObject("winMgmts:") iSQL = "Select * From Win32_Process Where Name=""" + WhatKill + """" Set Proc = WMI.ExecQuery(iSQL) For Each iProc In Proc iProc.Terminate Next Добавлено через 3 минуты Вот скрипт отключающий какой-либо процесс как только человек открывает диспетчер задач(таскмгр.ехе) - С ВЫДАЧЕЙ СООБЩЕНИЯ! Sub Run(ByVal sFile) Dim shell Set shell = CreateObject("WScript.Shell") shell.Run Chr(34) & sFile & Chr(34), 1, false Set shell = Nothing End Sub Run "C:\Windows\System32\taskmgr.exe" WhatKill = "memreduct.exe / Название программы" Set WMI = GetObject("winMgmts:") iSQL = "Select * From Win32_Process Where Name=""" + WhatKill + """" Set Proc = WMI.ExecQuery(iSQL) For Each iProc In Proc iProc.Terminate Next ' Сообщение on error resume next Set S = CreateObject("Wscript.Shell") set FSO=createobject("scripting.filesystemob ject") S.popup "Процесс MemReduct успешно завершен!",0, "Сообщение",0+0 0

Опции темы