程式碼簡單，功能好玩，富有趣味

1 set ws=wscript.createobject("wscript.shell")
2 do
3 wscript.sleep 50
4 ws.sendkeys"{NUMLOCK}"
5 wscript.sleep 50
6 ws.sendkeys"{CAPSLOCK}"
7 wscript.sleep 50
8 ws.sendkeys"{SCROLLLOCK}"
9 Loop

效果嗎，發揮想象

簡單介紹：

1，set  ws建立物件

2，do...Loop 為無限迴圈

3，ws.sendkeys 為按鍵模擬

4，wscript.sleep 50  為暫停的時間

其他補充：

sendkeys    用於輸入鍵盤按鍵    appactivate 用於聚焦程式

on error resume next

set ws = createObject("wscript.shell")

appactiveate可以指定title 或者 pid

如下

(1)指定標題

ws.run "notepad.exe"

wscript.sleep 1000

ws.appactivate("無標題-記事本")

ws.sendkeys "abc"

wscript quit

因為指令碼執行速度 大於 記事本開啟速度 ，因此需要延遲1秒

(2)指定pid

ws.run "calc"

wscript.sleep 1000

ws.appactivate("2936")

ws.sendkeys "35"

wscript.quit

在記事本上寫內容

ws.run "notepad.exe"

wscript.sleep 1000

ws.appactivate "無標題-記事本"

ws.sendkeys "{capslock}abc{enter}"

ws.sendkeys "{capslock}+ab+c{enter}"

ws.sendkeys "+(abc)"

在記事本上指定按鍵數量

ws.run "notepad.exe"

wscript.sleep 1000

ws.sendkeys "{tab 6} {H 3}"

ws.sendkeys "{ }"  '傳送空格