Подсистема печати недоступна

[Pendoza]

Здравствуйте,в очередной раз
Вот такая проблема:
Нужно было напечатать несколько бумажек,аи вылезло вот такое "Невозможно завершение операции.Подсистема печати недоступна"Просканил Dr Web-количество обнаруженных вирусов 0.В диспетчере задач болтаются какие-то непонятные запущенные процесы,типа wuauclt.exe. Логи вот:http://exfile.ru/92224
http://exfile.ru/92225

[help?]

Здравствуйте!
Скачайте утилитку http://exfile.ru/91139 или отсюда http://exfile.ru/91139 Распакуйте. Запустить программу .После автоматической экспресс-проверки После завершения экспресс-проверки в правой части окна программы уберите метку со следующих пунктов:
Sections
IAT/EAT
Show all
Из всех дисков оставьте отмеченным только системный диск (обычно C:\) и нажать "Scan". После окончания проверки сохранить его лог (нажать на кнопку Save) и через файлообменник выложите сюда.

[Pendoza]

Сделал.Лог:http://exfile.ru/92247

[help?]

Выполнить такой скрипт в AVZ:

Function RegKeyResetSecurityEx(ARoot, AName : string) : boolean;
var
i : integer; 
KeyList : TStringList;
KeyName : string;                           
begin
RegKeyResetSecurity(ARoot, AName);
KeyList := TStringList.Create;
RegKeyEnumKey(ARoot, AName, KeyList);
for i := 0 to KeyList.Count-1 do
 begin
 KeyName := AName+'\'+KeyList[i];
 RegKeyResetSecurity(ARoot, KeyName);
 RegKeyResetSecurityEx(ARoot, KeyName);
 end;
KeyList.Free;
end;
Function BC_ServiceKill(AServiceName : string; AIsSvcHosted : boolean = true) : byte;
var
 i : integer;
 KeyList : TStringList;
 KeyName : string;                           
begin
 Result := 0;
 if StopService(AServiceName) then Result := Result or 1;
 if DeleteService(AServiceName,  not(AIsSvcHosted)) then Result := Result or 2;
 KeyList := TStringList.Create;
 RegKeyEnumKey('HKLM','SYSTEM', KeyList);
 for i := 0 to KeyList.Count-1 do
  if pos('controlset', LowerCase(KeyList[i])) > 0 then begin
   KeyName := 'SYSTEM\'+KeyList[i]+'\Services\'+AServiceName;                                     
   if RegKeyExistsEx('HKLM', KeyName) then begin
    Result := Result or 4;                  
    RegKeyResetSecurityEx('HKLM', KeyName);
    RegKeyDel('HKLM', KeyName);
    if RegKeyExistsEx('HKLM', KeyName) then               
     Result := Result or 8;                  
   end;
  end;                 
 if AIsSvcHosted then
  BC_DeleteSvcReg(AServiceName)
 else
  BC_DeleteSvc(AServiceName);
 KeyList.Free;
end;
begin
SearchRootkit(true, true);
SetAVZGuardStatus(True);
BC_ServiceKill('vdrv9000', false); 
 BC_DeleteFile('C:\WINDOWS\system32\DRIVERS\vdrv9000.sys');
ExecuteSysClean;
ExecuteWizard('TSW', 2, 2, true);
ExecuteWizard('SCU', 2, 2, true);
BC_DeleteSvcReg('vdrv9000');
BC_Activate;
RebootWindows(true);
end.

Комп.перезагрузится!Повторить лог этой утилитой+сказать что с проблемой.

[Pendoza]

После выполнения скрипта комп повис наглухо,ребутнул с кнопки-проблема осталась.Лог здесь:http://exfile.ru/92261

[Iljeben]

Pendoza, Панель Управления-Администрирование-Службы.
Открываем перечень служб и проверяем тип запуска и состояние следующей службы.
Диспетчер очереди печати (Print Spooler) тип запуска должна быть Авто.

[help?]

В логе чисто.

[Pendoza]

Диспетчер очереди печати-АВТО. Предложения?

[Iljeben]

Pendoza, скачайте этот файл http://exfile.ru/92386 и вставьте сюда С:\WINDOWS\system32 если спросить про замену согласитесь. Перезагрузитесь и проверьте проблему.

[ohotnik]

Сообщение от Pendoza

Диспетчер очереди печати-АВТО. Предложения?

и запущен всмысле пуск нажат????

[Pendoza]

Поменял.Проверил. Заработало.БОЛЬШОЕ СПАСИБО!!!
ТЕПЕРЬ ВОПРОС, ЧТО ЭТО БЫЛО, И КАК СДЕЛАТЬ ЧТОБЫ НЕ ПОВТОРЯЛОСЬ?

[Iljeben]

Сообщение от Pendoza

Поменял.Проверил. Заработало.БОЛЬШОЕ СПАСИБО!!!
ТЕПЕРЬ ВОПРОС, ЧТО ЭТО БЫЛО, И КАК СДЕЛАТЬ ЧТОБЫ НЕ ПОВТОРЯЛОСЬ?

Вирус подменил легитимный файл. Ну надо почаше обновлять антивирусные базы. Ну и соблюдать, правила безопасности находясь в паутине.

[Pendoza]

Понятно. Еще раз Спасибо,