Показано с 1 по 4 из 4.

Подскажите: есть ли здесь что-нибудь криминальное? (заявка № 89381)

  1. #1
    Junior Member Репутация
    Регистрация
    01.10.2010
    Сообщений
    54
    Вес репутации
    23

    Thumbs up Подскажите: есть ли здесь что-нибудь криминальное?

    Последний раз редактировалось BaCbka87; 26.01.2011 в 16:03.

  2. Реклама
     

  3. #2
    Global Moderator Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация
    Регистрация
    26.12.2006
    Адрес
    Vladivostok
    Сообщений
    23,300
    Вес репутации
    1551
    Активной заразы не видно. Есть след, похоже, от червя Kido.

    Выполните скрипт в 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
    BC_ServiceKill('bxwyezxdm');
    BC_Activate;
    RebootWindows(true);
    end.
    Компьютер перезагрузится.
    Сделайте для контроля новый лог syscheck (только п.2 раздела Диагностика).

    Рекомендуется установить SP3 и последующие обновления.
    I am not young enough to know everything...

  4. #3
    Junior Member Репутация
    Регистрация
    01.10.2010
    Сообщений
    54
    Вес репутации
    23
    Спасибо большое.
    Последний раз редактировалось BaCbka87; 26.01.2011 в 16:03.

  5. #4
    Global Moderator Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация
    Регистрация
    26.12.2006
    Адрес
    Vladivostok
    Сообщений
    23,300
    Вес репутации
    1551
    Чисто.
    I am not young enough to know everything...

  • Уважаемый(ая) BaCbka87, наши специалисты оказали Вам всю возможную помощь по вашему обращению.

    В целях поддержания безопасности вашего компьютера настоятельно рекомендуем:


    Надеемся больше никогда не увидеть ваш компьютер зараженным!

    Если Вас не затруднит, пополните пожалуйста нашу базу безопасных файлов.
  • Присоединяйтесь к нам в соцсетях!

    Мы делаем все возможное, чтобы помогать людям в защите и лечении компьютеров.

    Похожие темы

    1. Есть ли здесь опасность?
      От fob в разделе Помогите!
      Ответов: 2
      Последнее сообщение: 15.09.2010, 07:36
    2. Здесь точно есть вирус.
      От EvilRabbit в разделе Помогите!
      Ответов: 4
      Последнее сообщение: 17.03.2010, 23:50
    3. Есть что-нибудь нехорошее?
      От zed3d в разделе Помогите!
      Ответов: 1
      Последнее сообщение: 04.02.2010, 12:01
    4. У кого-нибудь есть ТВ-тюнер? :)
      От ScratchyClaws в разделе Оффтоп
      Ответов: 8
      Последнее сообщение: 17.01.2010, 00:25
    5. Подскажите, где здесь собака порылась!
      От headproff в разделе Помогите!
      Ответов: 5
      Последнее сообщение: 06.11.2009, 13:45

    Свернуть/Развернуть Ваши права в разделе

    • Вы не можете создавать новые темы
    • Вы не можете отвечать в темах
    • Вы не можете прикреплять вложения
    • Вы не можете редактировать свои сообщения
    •  
    Page generated in 0.00098 seconds with 19 queries