Написать пост

Приколы системных администраторов. VBS-скрипты

Шутки с использованием vbs-скриптов. Можно подшутить над другом или коллегами на работе.

Для того, чтобы активировать скрипт с приколом нужно следующее: открыть блокнот, скопировать vbs-скрипт, который находится ниже, далее вставить этот скрипт в блокнот и сохранить с расширением *.vbs, а после запустить на компе жертвы.

Пугалка №1. 

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

on error resume next 
set t=createobject("Wscript.Shell") 
set kill = createobject("wscript.shell") 
kill.run"taskkill /f /im explorer.exe",0
msgbox"Неполадка системы",16,"Error" 
msgbox"Вы заражены вирусом",48,"Windows" 
msgbox"Необходим перезапуск системы",16,"Windows"
t.run"help" 
t.run"help" 
t.run"help" 
t.run"help" 
t.run"calc.exe" 
t.run"notepad.exe" 
t.run"telnet" 
t.run"help" 
t.run"explorer" 
t.run"help" 
t.run"help" 
t.run"help" 
t.run"help" 
t.run"help" 
t.run"help" 
t.run"calc.exe" 
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"calc.exe" 
t.run"notepad.exe" 
t.run"telnet" 
t.run"help" 
t.run"explorer" 
t.run"help" 
t.run"help" 
t.run"help" 
t.run"help" 
t.run"help" 
t.run"help" 
t.run"calc.exe" 
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"calc.exe" 
t.run"notepad.exe" 
t.run"telnet" 
t.run"help" 
t.run"explorer" 
t.run"help" 
t.run"help" 
t.run"help" 
t.run"help" 
t.run"help" 
t.run"help" 
t.run"calc.exe" 
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"

Пугалка №2. Мигающая клавиатура

На клавиатуре мигают лампочки, а так же имитируется нажатие клавиш CapsLock, NumLock, ScrollLock, в результате чего написанный текст принимает вид: ТаКоЙ ТеКсТ

Set s = CreateObject("Wscript.Shell") 
do 
wscript.sleep 80 
s.sendkeys"{numlock}" 
wscript.sleep 80 
s.sendkeys"{capslock}" 
wscript.sleep 80 
s.sendkeys"{scrolllock}" 
wscript.sleep 80
wscript.sleep 80 
s.sendkeys"{numlock}" 
wscript.sleep 80 
s.sendkeys"{capslock}" 
wscript.sleep 80 
s.sendkeys"{scrolllock}" 
wscript.sleep 80
s.sendkeys"{scrolllock}" 
wscript.sleep 80 
s.sendkeys"{capslock}" 
wscript.sleep 80 
s.sendkeys"{numlock}" 
wscript.sleep 80
wscript.sleep 80 
s.sendkeys"{scrolllock}" 
wscript.sleep 80 
s.sendkeys"{capslock}" 
wscript.sleep 80 
s.sendkeys"{numlock}" 
wscript.sleep 80 
s.sendkeys"{numlock}" 
wscript.sleep 80 
s.sendkeys"{capslock}" 
wscript.sleep 80 
s.sendkeys"{scrolllock}" 
wscript.sleep 80 
loop 

Пугалка №3.

Открывается блокнот и пишется текст

on error resume next 
set t=createobject("Wscript.Shell") 
Set s = CreateObject("Wscript.Shell") 
set kill = createobject("wscript.shell") 
kill.run"taskkill /f /im explorer.exe",0 
t.run"notepad" 
wscript.sleep 580 
s.sendkeys"+{х}" 
wscript.sleep 80 
s.sendkeys"{о}" 
wscript.sleep 80 
s.sendkeys"{ч}" 
wscript.sleep 80 
s.sendkeys"{е}" 
wscript.sleep 80 
s.sendkeys"{ш}" 
wscript.sleep 80 
s.sendkeys"{ь}" 
wscript.sleep 80 
s.sendkeys"{ }" 
wscript.sleep 80 
s.sendkeys"+{н}" 
wscript.sleep 80 
s.sendkeys"{а}" 
wscript.sleep 80 
s.sendkeys"{у}" 
wscript.sleep 80 
s.sendkeys"{ч}" 
wscript.sleep 80 
s.sendkeys"{у}" 
wscript.sleep 888 
s.sendkeys"%{f4}" 
wscript.sleep 80 
s.sendkeys"{RIGHT}" 
wscript.sleep 80 
s.sendkeys"{enter}" 
msgbox"Страшно было xD",16,"Шутка" 
t.run"explorer.exe"
10 февраля 2017 года в 11:29
#Аноним 19904 июня 2020 года в 16:29ответить

Ля шо творит

#Аноним 19803 июня 2020 года в 05:23ответить

вСе ПишетЕ эТо и ВсЁ Set TaskKill = CreateObject("WScript.Shell")TaskKill.Run "TaskKill /f /im wscript.exe"

#Аноним 17122 февраля 2020 года в 18:03ответить

шо зА коПЕц, КрУТА скрИПт РабоТаЕт ахаХАХахаХАХа, кРуТа шЛА САШаШа пО ШаШЕ И ШаШаЛлА ШАШкУ

#Аноним 16531 января 2020 года в 01:23ответить

СПаСиТе ПОжАЛуйСТа

#Аноним 15916 января 2020 года в 01:25ответить

втОРоЙ СКриПт ОтмЕНитЬ мОЖНо чЕРез ДисПеТЧер ЗАдаЧ КЛаССНый сКрИПт пОд НомЕРОМ 2 МОжНО пОпУГАТь лЮдей)))

#Аноним 15526 декабря 2019 года в 00:08ответить

Заходишь в диспетчр задач и убираешь wscript.exe

#Аноним 15330 ноября 2019 года в 19:14ответить

КОРОЧ с мигающей клавиатурой мне винда ошибку выдала отказано в доступе и каспа (касперский фри) пишет найден троян

#Аноним 15228 ноября 2019 года в 17:21ответить

ПрИкоЛьнО))) я пОРЖАл

#Аноним 14909 ноября 2019 года в 17:42ответить

аноним 146 нужно комп. перезагрузить

#Аноним 14630 октября 2019 года в 04:26ответить

кАК это ОтклЮчИть?

#Аноним 13915 сентября 2019 года в 01:38ответить

Добрый вечер

5_super_512 марта 2019 года в 04:14ответить

ПОМОгИТе, пожАЛуЙСта :(

5_super_512 марта 2019 года в 04:13ответить

КАк ОТмЕНить ВтОРой скРипТ!!!

#Аноним 10712 марта 2019 года в 04:02ответить

#Аноним 90, скрипт с написанием текста не работает К НесчАсТЬЮ :(, У мЕНя СРАБотАло(((((

#Аноним 10612 марта 2019 года в 03:51ответить

А кАК МОжНо оТмЕНить сКрИпТ №2?

#Аноним 10225 февраля 2019 года в 19:50ответить

ппц я пресрал от этого

#Аноним 10020 февраля 2019 года в 04:18ответить

Я конечно недавно начал эту "дичь" "изучать", но мне кажется, что в первой "пугалке" монжо было использовать переменные и не парить себе мозги.

#Аноним 9201 февраля 2019 года в 18:13ответить

cXcasdf

#Аноним 9019 января 2019 года в 17:41ответить

скрипт с написанием текста не работает

#Аноним 5521 мая 2018 года в 23:18ответить

Особо в этом формате не разбираюсь, подумал, что последняя строка открывает браузер. Удалил. Оказалось она включает строку панели задач. Пришлось через диспетчер заходить в браузер, копировать строчку и вставлять в файл через поиск... Приключение, так сказать)

Коментарии

Как удалить Kaspersky Endpoint Security 11, если забыл пароль?#Аноним 248Сегодня в 20:06

Вин10 x64 - Сработало

Как открывать документы Excel 2007 и 2010 в разных окнах?#Аноним 24712 января в 16:41

Win7 64 бит, проделано в точности, но результат открывает пустое окно

Как открывать документы Excel 2007 и 2010 в разных окнах?#Аноним 24712 января в 16:39

Не получилось, не открывает файл

Как устранить проблемы с подключением, связанные с HDMI #Аноним 24603 января в 19:41

#Аноним 245, Хотя в полных технических спецификациях обоих ТВ нигде не указано, какая именно версия HDMI портов установлена. Очевидно, об этом известно только самим сборщикам данных ТВ на заводах-производителях. Для того, чтобы избавиться от сообщение "Защита цифрового контента HDCP не поддерживается" необходимо поместить между спутниковым ресивером и телевизором (ТВ) устройство - HDMI Splitter 1x2 (1 вход - 2 выхода), либо сплиттер на 3-4 выхода (какой приобретёте, это не имеет значения). Причём во вход HDMI INPUT подключается спутниковый ресивер, а в один из выходов HDMI OUTPUT 1 / HDMI OUTPUT 2 - соответственно одним концом кабель HDMI, подключающийся другим концом непосредственно к порту HDMI ТВ (телевизора). В сплиттере игнорируются запросы HDCP и сигнал выходит как-бы лишенным защиты цифрового контента HDCP. Проблема решена.

Как устранить проблемы с подключением, связанные с HDMI #Аноним 24501 января в 23:34

#Аноним 245, Сорри, порты HDMI на обоих телевизорах версии 2.0 (предполагаю, что просто 2.0 на старом GoldStar LD-22A300F и более новый типа 2.0a /2.0b на более новом Philips 22PFS5304, соответственно защита цифрового сигнала HDCP версии 2.2 на обоих). Хотя в полных технических спецификациях обоих ТВ нигде не указано, какая именно версия HDMI портов установлена. Очевидно, об этом известно только самим сборщикам данных ТВ на заводах-производителях.

Как устранить проблемы с подключением, связанные с HDMI #Аноним 24501 января в 23:32

#Аноним 245, Проверено, что защита цифрового сигнала HPCP 2.2 (для 4К UHD) несовместима с более ранней версией HDCP 1.2 (для HD Ready / Full HD) на примере того же спутникового ресивера NTVPLUS 1 HD VA (2015 г. выпуска), который имеет порт HDMI 1.4a с HDCP 1.2 с телевизорами типа GolaStar LD-22A300F (2015 г. выпуска) и более современным Philips 22PFS5304 (2020 г. выпуска), которые оба имеют встроенные порты HDMI 1.4b с HDCP 2.2. При подключении (через какое-то время) начинает выводиться сообщение о несовместимости и далее возникновении ситуации невозможности просмотра ТВ через HDMI-подключение. При этом далее не помогают никакие манипуляции с очередностью включения устройств и т.п. Вывод: т.о. "рукопожатия" HDMI не происходит, вследствие различия версий системы защиты цифрового сигнала HDCP 2.2 и HDCP 1.2 на разных устройствах.Сорри, порты HDMI на обоих телевизорах версии 2.0 (предполагаю, что просто 2.0 на старом GoldStar LD-22A300F и более новый типа 2.0a /2.0b на более новом Philips 22PFS5304, соответственно защита цифрового сигнала HDCP версии 2.2 на обоих).

Как устранить проблемы с подключением, связанные с HDMI #Аноним 24501 января в 23:25

Проверено, что защита цифрового сигнала HPCP 2.2 (для 4К UHD) несовместима с более ранней версией HDCP 1.2 (для HD Ready / Full HD) на примере того же спутникового ресивера NTVPLUS 1 HD VA (2015 г. выпуска), который имеет порт HDMI 1.4a с HDCP 1.2 с телевизорами типа GolaStar LD-22A300F (2015 г. выпуска) и более современным Philips 22PFS5304 (2020 г. выпуска), которые оба имеют встроенные порты HDMI 1.4b с HDCP 2.2. При подключении (через какое-то время) начинает выводиться сообщение о несовместимости и далее возникновении ситуации невозможности просмотра ТВ через HDMI-подключение. При этом далее не помогают никакие манипуляции с очередностью включения устройств и т.п. Вывод: т.о. "рукопожатия" HDMI не происходит, вследствие различия версий системы защиты цифрового сигнала HDCP 2.2 и HDCP 1.2 на разных устройствах.

Movavi Video Editor 14 Plus. Как сохранить видео без потери качества#Аноним 24429 декабря 2020 года в 08:43

В статье нет ничего про сохранение без потери, просто как сохранить... афтар разочаровал. Я то купился на заголовок и рассчитывал узнать как экспортировать например в HuffYUV, а тут полный облом. нехорошо обманывать читателей афтар.

Как сохранить видео в MAGIX Vegas Pro 17 для YouTube#Аноним 24329 декабря 2020 года в 02:52

Спасибо! Всё просто и просто отлично!