![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Ошибка доступа в CreateRemoteThread [Win2k, WinXP]
Almaz © (2011-12-12 10:33:00)Есть код:
procedure CloseRemoteHandle(ProcessID: Cardinal; Handle: THandle);
var
hKernel32, hProcess, hThread: THandle;
Dummy: Cardinal;
PtrCloseHandle: Pointer;
begin
hKernel32 := LoadLibrary('kernel32.dll');
if hKernel32 = 0 then
RaiseLastOSError;
try
hProcess := OpenProcess(PROCESS_CREATE_THREAD or PROCESS_VM_OPERATION or PROCESS_VM_WRITE
or PROCESS_VM_READ, FALSE, ProcessID);
if hProcess = 0 then
RaiseLastOSError;
try
PtrCloseHandle := GetProcAddress(hKernel32, 'CloseHandle');
if Assigned(PtrCloseHandle) then
RaiseLastOSError;
hThread := CreateRemoteThread(hProcess, nil, 0, PtrCloseHandle, Pointer(Handle), 0, Dummy);
if hThread = 0 then
RaiseLastOSError;
try
if WaitForSingleObject(hThread, 2000) <> WAIT_OBJECT_0 then
RaiseLastOSError;
finally
CloseHandle(hThread);
end;
finally
CloseHandle(hProcess);
end;
finally
FreeLibrary( hKernel32 );
end;
end;
При вызове CreateRemoteThread происходит ошибка доступа. Какие привелегии кроме SeDebugPrivilege необходимо получить для успешного выполнения ? Процесс запущен от имени администратора.
Almaz (2011-12-12 16:09:00) [1]Спасибо !!! Глупая ошибка - действительно, забыл указать PROCESS_QUERY_INFORMATION.
Удачи.
депутатъ (2011-12-12 15:05:00) [2]The handle must have the ...PROCESS_QUERY_INFORMATION... access rights, and may fail without these rights on certain platforms.
Almaz (2011-12-12 13:49:00) [3]Опечатка, естественно :)
CRLF (2011-12-12 11:30:00) [4]
> if Assigned(PtrCloseHandle) then RaiseLastOSError;
То ли ты при цитировании наврал, то ли пытаемся CreateRemoteThread с нулевым стартовым адресом.