Лже-вирус "неисчезающее сообщение системы"
Назойливое сообщение системы , которое нельзя удалить.
Давно вас не баловали свежими лже-вирусами. Это не вирусы, конечно, но нервов вашим друзьям и коллегам они попортят немало.
Этот вирус будет выглядеть как диалоговое окно Windows с произвольной надписью, или сообщение системы, однако даже нажатие на кнопку ОК ни к чему не приведёт. Пользователь будет бесконечно нажимать на кнопку, но всё будет совершенно без толку!
Как всегда, текст внутри сообщения можете редактировать или составить свой, более неприятный и нацеленный на конкретную жертву.
Это сообщение системы , как всегда, является файлом скрипта Windows с, естественно, расширением .vbs. Ваша задача после того, как вы подкините файл в систему жертве, создать к файлу ярлычок и сменить его на самый невинный, затем уже скрыть его, сделав невидимым. То есть просто скрыть в свойствах файла. Кто забыл, читайте статью Операции с ярлыками на сайте Компьютер76.
Создаём же файл Блокнота и вносим простенький код со следующим содержанием:
do
lol=msgbox («Сейчас ваш диск будет уничтожен, а файлы стёрты!»)
loop
Русский шрифт – и есть ваше сообщение.

Сохраните файл под расширением .vbs. Готово!
После запуска на экране жертвы появится вот такое сообщение:

Прекратить это безобразие можно только через диспетчер задач. Найдете исполнительный файл .exe и завершите процесс.

Антивирусами этот процесс не обнаруживается, так что радуйтесь по-тихому!
Комментарии
Комментарий удален модератором
Комментарий удален модератором
Комментарий удален модератором
Комментарий удален модератором
Комментарий удален модератором
Спасибо!
А вообще - не понимаю, каким это надо быть мизантропом, чтобы подобную хрень незнакомым людям рассылать... Я уже не говорю об опасных вирусах.
Не, ну когда "я такую личную неприязнь испытываю к потерпевшему, что даже кушать не хочется" - это ещё можно понять и принять. Но я про остальных!
Если у сослуживца сердце здоровое ;)))))
Просто как-то само плавно ассоциировалось с настоящими вирусами.
Для того чтобы работало надо сохранять в кодировке 1251 (Windows Cyrillic).Работу проверял на Windows 7. Немного изменил скрипт:
Rem Комментарии начинаются с символа ' или со слова Rem в начале строки
' начало скрипта здесь!
Main
Sub Main
lol=0
Do
' стили окна даилога взяты с http://www.techonthenet.com/access/constants/msgbox_args.php
' лень считать самому, поэтому доверил сложить компьютеру :-)
lol = msgbox("Сейчас ваш диск будет уничтожен, а файлы стёрты!", 16 + 5 + 4096, "Внимание")
' коды возврата взяты с http://www.techonthenet.com/access/constants/msgbox_ret.php
If lol = 2 Then
lol = msgbox ("Ну ладно, уговорил :-)", 64, "Отмена")
WScript.Quit 1
Else
lol = msgbox ("С первого раза не получилось, попробуем ещё раз", 64, "Продолжим")
lol = 0
End If
Loop
End sub