當前位置:首頁 » 網頁前端 » windows自動多按鍵腳本
擴展閱讀
webinf下怎麼引入js 2023-08-31 21:54:13
堡壘機怎麼打開web 2023-08-31 21:54:11

windows自動多按鍵腳本

發布時間: 2022-11-30 04:12:36

1. 如何用按鍵精靈實現游戲多開,滑鼠按鍵同步操作

大家在打游戲時可能經常需要用滑鼠去執行重復的動作,去做練級,打怪的行為。時間久而久之就會感覺疲勞。按鍵精靈剛好可以解決此問題,解放雙手。

1、首先在電腦中打開按鍵精靈,點擊「我的腳本」。

2. 想做一個WINDOWS自帶的那種VBS腳本 ( 自動每隔 X秒 按 A鍵 N次 N次按完後 按1次 B鍵 然後關機) 謝謝

復制以下代碼存為VBS腳本文件就好,另外需要指定N(代碼的第六行)和X(代碼第九行,後面的任何東西不動)
Set ws=CreateObject("Wscript.Shell")
Set WshShell=WScript.CreateObject("WScript.Shell")
WScript.Sleep 300
dim i
i=0
do while i<N
i=i+1
WshShell.SendKeys "a"
WScript.Sleep X000
loop
WScript.Sleep 300
WshShell.SendKeys "b"
WScript.Sleep 300
ws.Run "cmd.exe /c shutdown -s -t 1",vbhide

3. 如何設置按鍵PC腳本開電腦後自動啟動運行

可以利用按鍵小精靈來實現開機自動運行按鍵精靈並啟動指定腳本,流程如下:
1:編寫小精靈的腳本命名為:自動運行指定腳本
腳本包含以下內容:
a:延遲幾十秒:該延遲等待電腦啟動後後台一些程序運行完畢。
b:啟動按鍵精靈:(可以利用啟動菜單里的運行,也可以點擊桌面指定位置的按鍵精靈圖標)
c:延遲數秒,把按鍵精靈最小化
d:發要啟動腳本的熱鍵
e:小精靈腳本結束

4. 怎樣使用BAT腳本實現自動按鍵盤的某個鍵

批處理是不行的 用VBS 很簡單 例子如下
Set objShell = CreateObject("Wscript.Shell")
do
WScript.Sleep 3000
objShell.SendKeys "{F5}"
WScript.Sleep 3000
objShell.SendKeys "{F5}"
loop

使用 SendKeys 方法可以將鍵擊發送到無自動化界面的應用程序中。多數鍵盤字元都可用一個鍵擊表示。某些鍵盤字元由多個鍵擊組合而成(例如,CTRL+SHIFT+HOME)。要發送單個鍵盤字元,請將字元本身作為 string 參數發送。例如,要發送字母 x,則請發送 string 參數 "x"。

可使用 SendKeys 同時發送多個鍵擊。為此,可將每個鍵擊按順序排列在一起,以此來創建表示一系列鍵擊的復合字元串參數。例如,要發送鍵擊 a、b 和 c,則需要發送字元串參數 "abc" 。SendKeys 方法將某些字元用作字元的修飾符(而不使用其本身的含義)。這組特殊的字元可包括圓括弧、中括弧、大括弧,以及:

加號 "+"
插入記號 "^"
百分號 "%"
和「非」符號 "~"

用大括弧 "{}" 括起這些字元可以發送它們。例如,要發送加號,請使用字元串參數 "{+}"。SendKeys中使用的中括弧 "[ ]" 無任何特殊含義,但是必須把它們括在大括弧中,以便容納確實要賦予其特殊含義的應用程序(例如,對於動態數據交換 (DDE) 就是這樣)。

要發送左中括弧字元,請發送字元串參數 "{[}";要發送右中括弧字元,請發送字元串參數 "{]}"。
要發送左大括弧字元,請發送字元串參數 "{{}";要發送右大括弧字元,請發送字元串參數 "{}}"。

某些鍵擊不生成字元(如 ENTER 和 TAB)。某些鍵擊表示操作(如 BACKSPACE 和 BREAK)。要發送這些類型的鍵擊,請發送下表中列出的參數:

空格鍵 " "
退格鍵 {BACKSPACE} 或 {BS} 或 {BKSP}
BREAK {BREAK}
DELETE {DELETE} 或 {DEL}
向下鍵 {DOWN}
向上鍵 {UP}
向左鍵 {LEFT}
向右鍵 {RIGHT}
END {END}
ENTER {ENTER} 或 ~
ESC {ESC}
TAB {TAB}
CAPS LOCK {CAPSLOCK}
HELP {HELP}
HOME {HOME}
INSERT {INSERT} 或 {INS}
NUM LOCK {NUMLOCK}
PAGE DOWN {PGDN}
PAGE UP {PGUP}
PRINT SCREEN {PRTSC}
SCROLL LOCK {SCROLLLOCK}

F1 {F1}
F2 {F2}
F3 {F3}
F4 {F4}
F5 {F5}
F6 {F6}
F7 {F7}
F8 {F8}
F9 {F9}
F10 {F10}
F11 {F11}
F12 {F12}

要發送由常規鍵擊和 SHIFT、CTRL 或 ALT 組合而成的鍵盤字元,請創建表示該鍵擊組合的復合字元串參數。可通過在常規鍵擊之前添加一個或多個以下特殊字元來完成上述操作:

SHIFT +
CTRL ^
ALT %

注意:這樣使用時,不用大括弧括起這些特殊字元。
要指定在按下多個其他鍵時,按下 SHIFT、CTRL 和 ALT 的組合,請創建復合字元串參數,用括弧括起其中的組合鍵。例如,要發送的組合鍵指定:

如果在按 e 和 c 的同時按 SHIFT 鍵,則發送字元串參數 "+(ec)"。
如果在按 e 時只按 c(而不按 SHIFT),則發送字元串參數 "+ec"。
可使用 SendKeys 方法發送一種在一行內重復按鍵的鍵擊。為此,要創建復合字元串參數,以指定要重復的鍵擊,並在其後指定重復次數。可使用 {鍵擊 數字} 形式的復合字元串參數來完成上述操作。例如,如果要發送 10 次 "x",則需要發送字元串參數 "{x 10}"。請確保在鍵擊和數字之間有一個空格。

注意:只可以發送重復按一個鍵的鍵擊。例如,可以發送 10 次 "x",但不可發送 10 次 "Ctrl+x"。
注意:不能向應用程序發送 PRINT SCREEN 鍵 {PRTSC}。

例子1:關機腳本 (模擬按鍵為:Ctrl + Esc、u、u )

把以下代碼復制至記事本,另存為 off.vbs

set WshShell = CreateObject("WScript.Shell")
WshShell.SendKeys "^{ESC}uu"

例子2:重啟腳本 (模擬按鍵為:Ctrl + Esc、u、r )

把以下代碼復制至記事本,另存為 reboot.vbs

set WshShell = CreateObject("WScript.Shell")
WshShell.SendKeys "^{ESC}ur"

例子3:切換輸入法 (模擬同時按下:Shift Ctrl )

set WshShell = CreateObject("WScript.Shell")
WshShell.SendKeys "+(^)"

例子4:輸入 cn-dos.net! 至記事本並保存為 CnDos.txt

Dim WshShell
Set WshShell=WScript.CreateObject("WScript.Shell")
WshShell.Run "notepad"
WScript.Sleep 1500
WshShell.AppActivate "無標題 - 記事本"
WshShell.SendKeys "c"
WScript.Sleep 200
WshShell.SendKeys "n"
WScript.Sleep 200
WshShell.SendKeys "-"
WScript.Sleep 200
WshShell.SendKeys "d"
WScript.Sleep 200
WshShell.SendKeys "o"
WScript.Sleep 200
WshShell.SendKeys "s"
WScript.Sleep 200
WshShell.SendKeys "."
WScript.Sleep 200
WshShell.SendKeys "n"
WScript.Sleep 200
WshShell.SendKeys "e"
WScript.Sleep 200
WshShell.SendKeys "t"
WScript.Sleep 200
WshShell.SendKeys "!"
WScript.Sleep 200
WshShell.SendKeys "%FS"
WScript.Sleep 500
WshShell.SendKeys "C"
WScript.Sleep 200
WshShell.SendKeys "n"
WScript.Sleep 200
WshShell.SendKeys "D"
WScript.Sleep 200
WshShell.SendKeys "o"
WScript.Sleep 200
WshShell.SendKeys "s"
WScript.Sleep 200
WshShell.SendKeys "%S"
WScript.Sleep 500
WshShell.SendKeys "%FX"

例子5:自動定時存檔的記事本(此腳本來自網上)

'第一部分:定義變數和對象
Dim WshShell, AutoSaveTime, TXTFileName
AutoSaveTime=(1000*60*1) '自動存檔時間為1分鍾
Set WshShell=WScript.CreateObject("WScript.Shell")
TXTFileName=InputBox("給文本起名(不能用中文和純數字):")

'第二部分:打開並激活記事本
WshShell.Run "notepad"
WScript.Sleep 200
WshShell.AppActivate "無標題 - 記事本"

'第三部分:用輸入的文件名存檔
WshShell.SendKeys "^s"
WScript.Sleep 300
WshShell.SendKeys TXTFileName
WScript.Sleep 300
WshShell.SendKeys "%s"
WScript.Sleep AutoSaveTime

'第四部分:自動定時存檔
While WshShell.AppActivate (TXTFileName)=True
WshShell.SendKeys "^s"
WScript.Sleep AutoSaveTime
Wend
WScript.Quit

例子:

set objShell = CreateObject("Wscript.Shell")
strCommandLine = "psetup755281.exe" '啟動安裝程序
objShell.Run(strCommandLine)
set WshShell = CreateObject("WScript.Shell")
WScript.Sleep 2000 '延時3秒
WshShell.SendKeys "{ENTER}" '模擬按下回車鍵執行下一步
WScript.Sleep 300 '延時3秒
WshShell.SendKeys "{ENTER}" '模擬按下回車鍵執行下一步
WScript.Sleep 300 '延時3秒
WshShell.SendKeys "{ENTER}" '模擬按下回車鍵執行下一步
WScript.Sleep 5200 '延時3秒
WshShell.SendKeys "{ENTER}" '模擬按下回車鍵執行下一步
WScript.Sleep 300 '延時3秒
WshShell.SendKeys "{ENTER}" '模擬按下回車鍵執行下一步
WScript.Sleep 300 '延時3秒
WshShell.SendKeys "{ENTER}" '模擬按下回車鍵執行下一步
WScript.Sleep 200
WshShell.SendKeys " " '模擬按下空格鍵去除安裝網路超級搜霸一行前的√號
WScript.Sleep 100
WshShell.SendKeys "{TAB}" '模擬按下 Tab 鍵選擇安裝項目
WScript.Sleep 200
WshShell.SendKeys " " '模擬按下空格鍵去除安裝網路超級搜霸一行前的√號
WScript.Sleep 200 '延時0.3秒
WshShell.SendKeys "f" '模擬按下 F鍵同意協議