Advertisement
Guest User

Untitled

a guest
Jan 25th, 2018
66
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. Set wshShell =wscript.CreateObject("WScript.Shell")
  2. myNum = 0
  3. Do While myNum < 100
  4. myNum = myNum + 1
  5. wscript.sleep 100
  6. wshshell.sendkeys "{CAPSLOCK}"
  7. wshshell.sendkeys "{NUMLOCK}"
  8. wshshell.sendkeys "{SCROLLLOCK}"
  9. Loop
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement