项目描述
翻译需要网络开发者服务。您需要编写一个脚本来停止系统中运行的文件。目标是停止第三方进程(所有系统进程除外)。该脚本是在AVZ脚本编辑器中编写的,使用它。
示例
Var Var Var Var Var.
i: integer;
开始.
// 更新进程列表
RefreshProcessList;
AddToLog ('进程数量 = '+IntToStr' (GetProcessCount))
// 分析接收列表的循环
for i := 0 to GetProcessCount - 1 do start
// 输出进程PID及其名称
AddToLog(IntToStr(GetProcessPID(i)) + '+ GetProcessName(i)');
// 根据条件停止进程
if pos('trojan.exe', LowerCase(GetProcessName(i))) > 0 then
TerminateProcess(GetProcessPID(i))
end;
结束.
使用了以下示例:AddToLog,GetProcessCount,GetProcessName,GetProcessPID,RefreshProcessList,TerminateProcess
此示例演示了使用上述所有函数与进程进行交互。首先,使用RefreshProcessList函数更新进程列表。然后,在循环中查看列表,并在协议中输出信息。
此外,终止可执行文件名包含文本“trojan.exe”的进程,通过调用TerminateProcess,传递进程标识符(PID)。
示例
Var Var Var Var Var.
i: integer;
开始.
// 更新进程列表
RefreshProcessList;
AddToLog ('进程数量 = '+IntToStr' (GetProcessCount))
// 分析接收列表的循环
for i := 0 to GetProcessCount - 1 do start
// 输出进程PID及其名称
AddToLog(IntToStr(GetProcessPID(i)) + '+ GetProcessName(i)');
// 根据条件停止进程
if pos('trojan.exe', LowerCase(GetProcessName(i))) > 0 then
TerminateProcess(GetProcessPID(i))
end;
结束.
使用了以下示例:AddToLog,GetProcessCount,GetProcessName,GetProcessPID,RefreshProcessList,TerminateProcess
此示例演示了使用上述所有函数与进程进行交互。首先,使用RefreshProcessList函数更新进程列表。然后,在循环中查看列表,并在协议中输出信息。
此外,终止可执行文件名包含文本“trojan.exe”的进程,通过调用TerminateProcess,传递进程标识符(PID)。
网页编程 银行转账
Attached files
Files are available only to Freelancers and the project author