Re: Как перехватить CreateProcess ?
От: s.ts  
Дата: 01.09.04 06:53
Оценка: 4 (1)
Hello, !
You wrote on Wed, 01 Sep 2004 00:40:47 GMT:

> Нужно поставить глобальный перехват на запуск приложений.

> Хочу сначала подгрузить свою библиотеку, а потом запускать програму.
> Напишите кусок кода или отправте туда где есть, спасибо...

Перехватить запуск приложения можно через WMI. Дальше код на VBScript, кот. можно на дельфи перевести:
Set objWMIServices = GetObject("WinMgmts:") 

Set sink = WScript.CreateObject("WbemScripting.SWbemSink","SINK_")
 
objWMIServices.ExecNotificationQueryAsync sink, _
"SELECT * FROM Win32_ProcessStartTrace"

WScript.Echo "Waiting for events"

Sub SINK_OnObjectReady(objObject, objAsyncContext)
    WScript.Echo (objObject.ProcessName)
End Sub

Таким же макаром можно много чего ловить — только запрос select меняется.
Posted via RSDN NNTP Server 1.9 beta
 
Подождите ...
Wait...
Пока на собственное сообщение не было ответов, его можно удалить.