VBS

22 Июн 2012 | Автор: | комментариев 6 »

Здравствуйте Уважаемые РОССИЯНЕ!!! Я Влад и сейчас я вам расскажу как я избавился от очень уж надоедливого ламера. Как то сижу переписываюсь в @mail почте и тут меня начал дастовать один пользователь электронной почты. Писал мне всякую Ф..ню... то одно то другое. И вдруг меня осенило (я в то время знал про "vbs" скрипты ), а не сотворить мне для него очень прикольную пугалку...!...

Конечно я много чего использовал с интернета, но я собрал все виды скриптов в один.. и получилось то о чём ни кто ни когда не слышал! И послал ему на компьютер, после того как он запустил приложение, он меня перестал доставать!!!

А сейчас я опешу то, что я сделал:

1) Открываете блокнот(текстовый документ) и прописывайте следующие строки... а) vopros=msgbox("Ты ещё будешь доставать [H]ouse?? Если ДА то случится не поправимое!" ,4, "ВОПРОС") b) if vopros=6 then msgbox" --- Здесь код который описан ниже...---" с) else msgbox" Правельный выбор" d) end if

2) Сейчас я опишу что написано под цифрой 1 которая располагается выше... Под разделом "a)" находится сам вапрос, где "Ты ещё будешь доставать [H]ouse??" -- это вопрос который будет задаваться при запуске нашего скрипта, на который будет ток два варианта ответа "Да" и "Нет". Где " ,4, " это вид нашего окошка. Где "ВОПРОС" эт название с верху. Под разделом "b)" Это Всё что будет если он нажмёт "Да" код будет описан ниже... Под разделом "с)" Всё что будет если он нажмёт "Нет" Ну а под "d)" эта надпись заканчивает действие нашего скрипта.

3) А вот сам код который нуна вставить туда где описано выше

on error resume next set t=createobject("Wscript.Shell") msgbox"Неполадка системы",16,"Error"
msgbox"Вы заражены вирусом",48,"Windows" t.run"help" t.run"help"
t.run"help" t.run"help" t.run"notepad.exe" t.run"telnet"
t.run"help" t.run"help" t.run"help" t.run"help" t.run"help"
t.run"help" t.run"help" t.run"notepad.exe" t.run"telnet"
t.run"help" t.run"help" msgbox"Сбой системы",16,"Windows"
t.run"help" t.run"help" t.run"help" t.run"help" t.run"help"
t.run"help" t.run"help" t.run"help" t.run"help" t.run"help"
t.run"help" t.run"help" t.run"help" t.run"help"
t.run"help" t.run"help" t.run"help" t.run"help" t.run"help"
t.run"help" t.run"help" t.run"help" t.run"help"
t.run"help" t.run"help" t.run"help" t.run"help" t.run"help"
t.run"help" t.run"help" t.run"help" t.run"help"
t.run"help" msgbox"Неполадка системы",16,"Error"
t.run"notepad.exe"

Это особого рода пугалка! Если перед ней поставить вот такую надпись... WScript.Sleep 60000 то через 60 секунд она включется после нажатия на значок.

4) В целом ваш скрипт должен выглядеть вот так...

vopros=msgbox("Ты ещё будешь доставать [H]ouse?? Если ДА то случится не поправимое!" ,4, "ВОПРОС") if vopros=6 then msgbox" on error resume next set t=createobject("Wscript.Shell")
msgbox"Неполадка системы",16,"Error" msgbox"Вы заражены вирусом",48,"Windows" t.run"help" t.run"help" t.run"help"
t.run"help" t.run"notepad.exe" t.run"telnet" t.run"help"
t.run"help" t.run"help" t.run"help" t.run"help" t.run"help"
t.run"help" t.run"notepad.exe" t.run"telnet" t.run"help"
t.run"help" msgbox"Сбой системы",16,"Windows" t.run"help"
t.run"help" t.run"help" t.run"help" t.run"help"
t.run"help" t.run"help" t.run"help" t.run"help" t.run"help"
t.run"help" t.run"help" t.run"help" t.run"help"
t.run"help" t.run"help" t.run"help" t.run"help" t.run"help"
t.run"help" t.run"help" t.run"help" t.run"help"
t.run"help" t.run"help" t.run"help" t.run"help" t.run"help"
t.run"help" t.run"help" t.run"help" t.run"help"
t.run"help" msgbox"Неполадка системы",16,"Error" t.run"notepad.exe" " else msgbox" Правельный выбор" end if

Если вы случайно запустите этот скрипт у себя на компьютере НЕ ПУГАЙТЕСЬ, ВАШЕМУ КОМПУ НИ ЧЕГО НЕ ГРОЗИТ!!!
КОНЕЦ!!!

Метки записи:

Комментарии к записи " VBS"

Посмотреть последние комментарии
  1. Не думаю, что сейчас такой номер прокатит... Запустить документ от совершенно незнакомого корреспондента может только безнадёжный оптимист либо полный даун.
    Да и наворот с написанием скрипта выглядит просто забавой - проще было бы поместить этого товарища в черный список либо поставить спам-детектор. Иначе можно нарваться на какого-нибудь неадеквата, который от простого закидывания письмами откроет настоящую войну...
    Но тема поднята действительно стоящая, иначе не было бы так много людей желающих совершить противоправные действия со спамерами и вирусописателями. 🙂

  2. Я не ошибусь, если назову Бейсик (BASIC - Begginners Allpurpose Symbolic Instruction Code, т.е символический командный универсальный код для начинающего 🙂 самым простым языком программирования. Даже при небольшом опыте, программы можно писать практически не задумываясь. Свою историю этот язык программирования высокого уровня начал в далеком 1963 году. Именно тогда небольшой группой студентов последнего курса Дортмутского колледжа под чутким руководством профессора Дж. Кемени и была разработана самая первая версия этого языка. В то время, помимо Бейсика, широко были распространены также Fortran, Cobol, Algol, PL/1, Focal и Pascal. Из них, до настоящего времени дожили, пожалуй лишь Паскаль и Бейсик, сильно изменившись при этом.

  3. С появлением в интернете социальных сетей и различных программ для переговоров подобные вещи происходят не так уж и редко у многих пользователей, так что мысль высказанная в данной статье довольно полезная, тока мне кажется, что врядли щас кто то станет открывать сомнительное письмо, да и еще с таким текстом. Может лучше отправить какоенибудь рекламное письмо с реальной халявой, а вот ссылку в нем заменить на путь к хорошему вирусу?

  4. VBS (от анг. Visual Basic Script) это язык для написания скриптов, позволяющий без особых усилий писать приколы, вирусы, и просто полезные скрипты в блокноте. Т.е для этого достаточно просто иметь комп с установленой Win XP, никаких компиляторов, и сложных команд. VBS прост в освоении, и вообщем за пару дней можно научиться писать вполне впечатляющие приколы.

  5. My porlbem was a wall until I read this, then I smashed it.

Здесь вы можете написать комментарий к записи "VBS".

* Обязательные для заполнения поля
Все отзывы проходят модерацию.
Мы в VK
Наши партнеры
Читать нас
Связаться с нами
Наши контакты

info@windowsfan.ru

О сайте

Информационно-познавательный интернет журнал про Windows