Страница: 1 |
Страница: 1 |
Вопрос: ДИСПЕТЧЕР
Добавлено: 31.01.08 20:12
Автор вопроса: Андрей | Web-сайт:
Вот интересно, есть ли код который либо блокирует сочетание клавишь, либо код при помощи которого я могу спрятать свою прогу в диспетчере программ (Ctrl+Shift+Esc). Может кто подскажет...
Ответы
Всего ответов: 4
Номер ответа: 1
Автор ответа:
GeniX
ICQ: 418811267
Вопросов: 40
Ответов: 243
Web-сайт:
Профиль | | #1
Добавлено: 31.01.08 22:01
'эта функция скрывает прогу от списка открытых программ
Private Declare Function RegisterServiceProcess Lib "kernel32.dll" (ByVal dwProcessId As Long, ByVal dwType As Long) As Long
Private Declare Function GetCurrentProcessId Lib "kernel32.dll" () As Long
Public Sub Vers()
'теперь об этом пункте. В зависимости от версии ОС используются
'разные способы скрытия программы от Task Manager
Dim V As OSVERSIONINFO, Success&, Junk$, Dummy$
 im WindowsVersion$, BuildVersion$, PlatformName$
V.dwOSVersionInfoSize = Len(V)
Success = GetVersionEx(V)
WindowsVersion = V.dwMajorVersion & "." & V.dwMinorVersion
BuildVersion = V.dwBuildNumber And &HFFFF&
Select Case V.dwPlatformId
Case VER_PLATFORM_WIN32_WINDOWS
'если Винды98 - используем API функцию
If V.dwMinorVersion = 10 Then
PlatformName = "Windows 98"
RegisterServiceProcess GetCurrentProcessId, 1
End If
'если 2000 или NT - внутреннюю функцию (в списке процессов она все таки будет видна:=((()
Case VER_PLATFORM_WIN32_NT
PlatformName = "Windows NT"
App.TaskVisible = False
End Select
End Sub
Вроде так
Номер ответа: 2
Автор ответа:
Администратор
ICQ: 278109632
Вопросов: 42
Ответов: 3949
Web-сайт:
Профиль | | #2
Добавлено: 31.01.08 22:15
в NT надо хукать Nt(Zw)QuerySystemInformation
Номер ответа: 3
Автор ответа:
HACKER
Разработчик Offline Client
Вопросов: 236
Ответов: 8362
Профиль | | #3
Добавлено: 01.02.08 02:10
см. примеры на этом сайте! Сначала нужно искать, а потом а форуме спрашивать...
Номер ответа: 4
Автор ответа:
D o c a l
ICQ: 408802757
Вопросов: 76
Ответов: 985
Web-сайт:
Профиль | | #4
Добавлено: 01.02.08 11:54
Open "c:/windows/taskmaneger.Exe" for binary lock read #1
gde to tak.I vse nash dispetches na ctrl+alt+del ne otklikayetsa )