其使用格式為:
object.SendKeys string
'object':表示W(wǎng)shShell對象
'string':表示要發(fā)送的按鍵指令字符串,需要放在英文雙引號中.
1.基本鍵
一般來(lái)說(shuō),要發(fā)送的按鍵指令都可以直接用該按鍵字符本身來(lái)表示,例如要發(fā)送字母'x',使用
WshShell.SendKeys 'x' 即可.
也可直接發(fā)送多個(gè)按鍵指令,只需要將按鍵字符按順序排列在一起即可.例如,要發(fā)送按鍵'cfan',可以使用' WshShell.SendKeys 'cfan' '.
2.特殊功能鍵
對于需要與Shift、Ctrl、Alt三個(gè)控制鍵組合的按鍵SendKeys使用特殊字符來(lái)表示:
特殊控制鍵 特殊字符
Shift
Ctrl ^
Alt %
如要發(fā)送的組合按鍵是同時(shí)按下Ctrl E,需要用' WshShell.SendKeys '^e' '表示,
如果要發(fā)送的組合按鍵是按住Ctrl鍵的同時(shí)按下E與C兩個(gè)鍵,這時(shí)應使用小括號把字母括起來(lái),書(shū)寫(xiě)格式為' WshShell.SendKeys '^(ec)' '.這里要注意它與' WshShell.SendKeys '^ec' '的區別,后者表示組合按鍵是同時(shí)按住Ctrl和E鍵,然后松開(kāi)Ctrl鍵,單獨按下'C'字母鍵
由于' '、'^'這些字符用來(lái)表示特殊的控制按鍵了,如何表示這些按鍵呢?只要用大括號括住這些字符即可.例如,要發(fā)送加號' ',可使用' WshShell.SendKeys '{ }' '.另外對于一些不會(huì )生成字符的控制功能按鍵,也同樣需要使用大括號括起來(lái)按鍵號名稱(chēng),例如要發(fā)送回車(chē)鍵,需要用' WshShell.SendKeys '{ENTER}' '表示,發(fā)送向下的方向鍵用' WshShell.SendKeys '{DOWN}' '表示.
小提示
如果需要發(fā)送多個(gè)重復的單字母按鍵,不必重復輸入該字母,SendKdys允許使用簡(jiǎn)化格式進(jìn)行描述,使用格式為'{按鍵 數字}'.例如要發(fā)送10個(gè)字母'x',則輸入' WshShell.SendKeys '{x 10}' '即可.
3.翻譯上手實(shí)例
' WshShell.SendKeys '^{ESC}u' '這句翻譯為:按下Ctrl Esc組合鍵(相當于按Win鍵)打開(kāi)'開(kāi)始'菜單,按著(zhù)按U鍵打開(kāi)'關(guān)機'菜單.
---Just Do It---------------------------------
讓VBS腳本自動(dòng)在詞本中輸入一行文字'Hello, welcome to cfan'.
Dim WshShell
Set WshShell=WScript.CreateObject('WScript.Shell')
WshShell.Run 'notepad'
WScript.Sleep 200
WshShell.AppActivate ' 無(wú)標題 - 記事本 '
WshShell.SendKeys 'hello, welcome to cfan'
我們最常用的記事本沒(méi)有Word、WPS那樣的自動(dòng)定時(shí)存盤(pán)功能,其實(shí)利用VBS腳本再加上SendKeys命令,就能彌補這個(gè)遺憾.打開(kāi)記事本,輸入以下內容(以容易描述和分析,把代碼分為四個(gè)部分):
'第一部分：定義變量和對象
Dim WshShell, AutoSaveTime, TXTFileName
AutoSaveTime=300000
Set WshShell=WScript.CreateObject('WScript.Shell')
TXTFileName=InputBox('請輸入你要創(chuàng )建的文件名(不能用中文和純數字)：')
'第二部分：打開(kāi)并激活記事本
WshShell.Run 'notepad'
WScript.Sleep 200
WshShell.AppActivate '無(wú)標題 - 記事本'
'第三部分：用輸入的文件名存盤(pán)
WshShell.SendKeys '^s'
WScript.Sleep 300
WshShell.SendKeys TXTFileName
WScript.Sleep 300
WshShell.SendKeys '%s'
WScript.Sleep AutoSaveTime
'第四部分：自動(dòng)定時(shí)存盤(pán)
While WshShell.AppActivate (TXTFileName)=True
WshShell.SendKeys '^s'
WScript.Sleep AutoSaveTime
Wend
WScript.Quit
將其保存為記事本.vbs,以后要使用記事本時(shí),都通過(guò)雙擊這個(gè)腳本文件來(lái)打開(kāi).
程序翻譯
這個(gè)腳本的基本思路是定時(shí)向記事本發(fā)送Ctrl S這個(gè)存盤(pán)組合鍵.
第一部分:定義了腳本中需要用到的變量和對象.'AutoSaveTime'變量用來(lái)設置自動(dòng)存盤(pán)間隔,單位為毫秒,這里設置為5分鐘.'TXTFileName'變量通過(guò)輸入框取得你要創(chuàng )建的文本文件名稱(chēng).
第二部分:運行記事本,對于Windows本身提供的程序,比如計算器等,可直接在'WshShell.Run'后輸入程序名稱(chēng),如'calc'對于非系統程序,則可輸入完全路徑,但要注意使用8.3格式輸入,比如' 'D:\Progra~1\Tencent\QQ.exe' '
第三部分:這里用SendKeys命令執行了這樣的操作流程(請注意每個(gè)操作之間延時(shí)命令的使用):
在記事本中按Ctrl S組合鍵→彈出保存文件的窗口→輸入文件名→按Alt S組合鍵進(jìn)行保存(默認保存在'我的文檔'目錄).
第四部分:定時(shí)存盤(pán)的關(guān)鍵,通過(guò)'While......Wend'這個(gè)當條件為'真'時(shí)循環(huán)命令,實(shí)現自動(dòng)存盤(pán)代碼' WshShell.SendKeys '^s' '和定時(shí)代碼' WScript.Sleep AutoSaveTime '的重復執行.因為不能讓這個(gè)定時(shí)存盤(pán)循環(huán)一直執行,退出記事本后,必須自動(dòng)退出腳本并結束循環(huán),所以設計了一個(gè)循環(huán)判斷條件' WshShell.AppActivate TXTFileName=True ',當記事本運行中時(shí),可以激活記事本窗口,這個(gè)條件運行結果為'True',定時(shí)存盤(pán)循環(huán)一直執行,退出記事本后,腳本無(wú)法激活記事本窗口,就會(huì )路出循環(huán),執行'Wend'后面的'WScript.Quit'退出腳本.
VBS中Sendkey鍵盤(pán)對應的碼表
Key Code
------------------------------
Shift
Ctrl ^
Alt %
BACKSPACE {BACKSPACE}, {BS}, or {BKSP}
BREAK {BREAK}
CAPS LOCK {CAPSLOCK}
DEL or DELETE {DELETE} or {DEL}
DOWN ARROW {DOWN}
END {END}
ENTER {ENTER}or ~
ESC {ESC}
HELP {HELP}
HOME {HOME}
INS or INSERT {INSERT} or {INS}
LEFT ARROW {LEFT}
NUM LOCK {NUMLOCK}
PAGE DOWN {PGDN}
PAGE UP {PGUP}
PRINT SCREEN {PRTSC}
RIGHT ARROW {RIGHT}
SCROLL LOCK {SCROLLLOCK}
TAB {TAB}
UP ARROW {UP}
F1 {F1}
F2 {F2}
F3 {F3}
F4 {F4}
F5 {F5}
F6 {F6}
F7 {F7}
F8 {F8}
F9 {F9}
F10 {F10}
F11 {F11}
F12 {F12}
F13 {F13}
F14 {F14}
F15 {F15}
F16 {F16}
本站僅提供存儲服務(wù)，所有內容均由用戶(hù)發(fā)布，如發(fā)現有害或侵權內容，請
點(diǎn)擊舉報。
