Текущий архив: 2007.04.08;
Скачать: CL | DM;

Вниз

Определить список процессов   Найти похожие ветки 

← →
Grassus   (2006-10-24 12:05) [0]

Знает кто нибудь, как по сети определить на каком компе запущены какие процессы (например WinAmp, Word и т.п.)

---

← →
Орион ©   (2006-10-24 15:29) [1]

uses TlHelp32;

procedure ListProcessModules(List: TStringList; ClearList: Boolean = True);
var
 SnapShot: THandle;
 PE: TProcessEntry32;
 ProcessInfo: TProcessInformation;
 ProcName: string;
 ExitCode: DWord;
begin
 if ClearList then List.Clear;
 SnapShot:=CreateToolHelp32Snapshot(TH32CS_SNAPPROCESS, 0);
 if SnapShot=INVALID_HANDLE_VALUE then Exit;
 try
  PE.dwSize:=SizeOf(TProcessEntry32);
  if Process32First(SnapShot, PE) then
  repeat
   ProcessInfo.hProcess:=OpenProcess(PROCESS_QUERY_INFORMATION, False, PE.th32ProcessID);
   if (ProcessInfo.hProcess>32) then
   begin
    GetExitCodeProcess(ProcessInfo.hProcess, ExitCode);
    if ExitCode=STILL_ACTIVE then List.Add(string(PE.szExeFile));
   end;
  until not Process32Next(SnapShot, PE);
 finally
  CloseHandle(SnapShot);
 end;
end;

---

← →
Орион ©   (2006-10-24 15:34) [2]

опс. Я прошу прощения. Как всегда не дочитал вопрос до конца :(


> [0] Grassus   (24.10.06 12:05)

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

---

Страницы: 1 вся ветка

Текущий архив: 2007.04.08;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.041 c