Écrire un script

Des services de développeur web sont requis. Vous devez écrire un script pour arrêter les fichiers en cours d'exécution dans le système. L'objectif est d'arrêter les processus tiers (tous sauf les processus système). Le script est écrit sur l'éditeur de script AVZ, il est utilisé dans celui-ci.
Exemple
Var Var Var Var Var.
i: entier;
Début.
// Mise à jour de la liste des processus
RefreshProcessList;
AddToLog ('Nombre de processus = '+IntToStr' (GetProcessCount))
// Cycle d'analyse de la liste reçue
pour i := 0 à GetProcessCount - 1 faire commencer
// Sortie PID du processus et son nom
AddToLog(IntToStr(GetProcessPID(i)) + '+ GetProcessName(i)');
// Arrêt du processus sous condition
si pos('trojan.exe', LowerCase(GetProcessName(i))) > 0 alors
TerminateProcess(GetProcessPID(i))
fin;
Fin.

Les exemples suivants ont été utilisés : AddToLog, GetProcessCount, GetProcessName, GetProcessPID, RefreshProcessList, TerminateProcess

Cet exemple démontre l'utilisation de toutes les fonctions décrites ci-dessus pour travailler avec les processus. Tout d'abord, la liste des processus est mise à jour en utilisant la fonction RefreshProcessList. Ensuite, la liste est consultée dans une boucle avec les informations affichées dans le protocole.
De plus, les processus dont le nom de fichier exécutable contient le texte “trojan.exe” sont terminés en appelant TerminateProcess, auquel l'identifiant de processus (PID) est transmis.