Got a little boared today (holding monday on tuesday does it) which is kind of dangerous because it sometimes gets me into trouble...not too bad today though. here's the result.
(very childish i know)
using psexec i open a shell on a co-workers computer (requirers admin rights) copied a vbs script to it and scheduled it to run using 'AT' (AT 12:28 /interactive "matrix.vbs") giving myself time to be there when it happens.
She says:
"what the...!"
"did you see that?"
me:
"did i see what?"
she:
"a box opened an..."
"...nevermind."
Matrix.vbs
-------------------
set wshshell = CreateObject("WScript.Shell")
wshshell.Run "cmd.exe"
WScript.Sleep 50
wshshell.SendKeys "cls {ENTER}"
WScript.Sleep 1000
wshshell.SendKeys "W"
WScript.Sleep 200
wshshell.SendKeys "a"
WScript.Sleep 200
wshshell.SendKeys "k"
WScript.Sleep 200
wshshell.SendKeys "e "
WScript.Sleep 200
wshshell.SendKeys "u"
WScript.Sleep 200
wshshell.SendKeys "p "
WScript.Sleep 400
wshshell.SendKeys "A"
WScript.Sleep 200
wshshell.SendKeys "n"
WScript.Sleep 200
wshshell.SendKeys "n"
WScript.Sleep 200
wshshell.SendKeys "e"
WScript.Sleep 200
wshshell.SendKeys "!"
WScript.Sleep 3000
wshshell.SendKeys "{ESC}"
WScript.Sleep 1000
wshshell.SendKeys "t"
WScript.Sleep 200
wshshell.SendKeys "h"
WScript.Sleep 200
wshshell.SendKeys "e "
WScript.Sleep 300
wshshell.SendKeys "m"
WScript.Sleep 200
wshshell.SendKeys "a"
WScript.Sleep 200
wshshell.SendKeys "t"
WScript.Sleep 400
wshshell.SendKeys "r"
WScript.Sleep 200
wshshell.SendKeys "i"
WScript.Sleep 200
wshshell.SendKeys "x "
WScript.Sleep 400
wshshell.SendKeys "h"
WScript.Sleep 200
wshshell.SendKeys "a"
WScript.Sleep 200
wshshell.SendKeys "s "
WScript.Sleep 200
wshshell.SendKeys "y"
WScript.Sleep 200
wshshell.SendKeys "o"
WScript.Sleep 200
wshshell.SendKeys "u"
WScript.Sleep 200
wshshell.SendKeys "."
WScript.Sleep 100
wshshell.SendKeys "."
WScript.Sleep 100
wshshell.SendKeys "."
WScript.Sleep 4000
wshshell.SendKeys "{ESC}"
wshshell.SendKeys "exit {ENTER}"




Reply With Quote