Guest User

Keyboard Light System

a guest
Aug 4th, 2017
404
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. Set WshShell = WScript.CreateObject("WScript.Shell")
  2. do
  3. WshShell.SendKeys "{CAPSLOCK}"
  4. WScript.Sleep 100
  5. WshShell.SendKeys "{NUMLOCK}"
  6. WScript.Sleep 100
  7. WshShell.SendKeys "{SCROLLLOCK}"
  8. WScript.Sleep 100
  9. WshShell.SendKeys "{NUMLOCK}"
  10. WScript.Sleep 100
  11. WshShell.SendKeys "{CAPSLOCK}"
  12. WScript.Sleep 100
  13. loop
RAW Paste Data