Ольгуня,
1) Выполните это
Код:
var
Lines : TStrings;
i : integer;
begin
Lines := TStringList.Create;
SearchFiles('%WinDir%', 'taskman.exe', Lines, true, false);
for i:= 0 to Lines.Count-1 do
AddToLog(Lines[i]+',Size='+inttostr(GetFileSize(Lines[i])));
SearchFiles('%System32%', 'taskman.exe', Lines, true, false);
for i:= 0 to Lines.Count-1 do
AddToLog(Lines[i]+',Size='+inttostr(GetFileSize(Lines[i])));
Lines.Free;
SaveLog(GetCurrentDirectory+'avz_log.txt');
end.
После выполнения комп не будет перезагружаться. Вам надо будет только в папке с программой avz найти файл
avz_log.txt и содержимое этого файла сюда переписать.
2) Что с доступом к проблемным сайтам?
