Описание проекта
Требуются услуги веб разработчика. Необходимо написать скрипт для остановки запущенных файлов в системе. Задача - остановить сторонние процессы (все, кроме системных). Скрипт пишется на редакторе скриптов AVZ, применяется в ней же.
Пример
Var
i : integer;
Begin
// Обновление списка процессов
RefreshProcessList;
AddToLog('Количество процессов = '+IntToStr(GetProcessCount));
// Цикл анализа полученного списка
for i := 0 to GetProcessCount - 1 do begin
// Вывод PID процесса и его имя
AddToLog(IntToStr(GetProcessPID(i)) + ' '+ GetProcessName(i));
// Остановка процесса по условию
if pos('trojan.exe', LowerCase(GetProcessName(i))) > 0 then
TerminateProcess(GetProcessPID(i));
end;
End.
В примере использовались: AddToLog, GetProcessCount, GetProcessName, GetProcessPID, RefreshProcessList, TerminateProcess
Данный пример демонстрирует использование всех описанных выше функций для работы с процессам. Сначала при помощи функции RefreshProcessList производится обновление списка процессов. Затем производится просмотр списка в цикле с выводом информации в протокол.
Кроме того, производится завершение процессов, имя исполняемого файла которых содержит текст "trojan.exe" при помощи вызова TerminateProcess, которому передается идентификатор процесса (PID).
Пример
Var
i : integer;
Begin
// Обновление списка процессов
RefreshProcessList;
AddToLog('Количество процессов = '+IntToStr(GetProcessCount));
// Цикл анализа полученного списка
for i := 0 to GetProcessCount - 1 do begin
// Вывод PID процесса и его имя
AddToLog(IntToStr(GetProcessPID(i)) + ' '+ GetProcessName(i));
// Остановка процесса по условию
if pos('trojan.exe', LowerCase(GetProcessName(i))) > 0 then
TerminateProcess(GetProcessPID(i));
end;
End.
В примере использовались: AddToLog, GetProcessCount, GetProcessName, GetProcessPID, RefreshProcessList, TerminateProcess
Данный пример демонстрирует использование всех описанных выше функций для работы с процессам. Сначала при помощи функции RefreshProcessList производится обновление списка процессов. Затем производится просмотр списка в цикле с выводом информации в протокол.
Кроме того, производится завершение процессов, имя исполняемого файла которых содержит текст "trojan.exe" при помощи вызова TerminateProcess, которому передается идентификатор процесса (PID).
Веб программирование Банковский перевод
Прикреплённые файлы
Файлы доступны только фрилансерам и автору проекта
