如何用批处理命令运行组合键.docx
《如何用批处理命令运行组合键.docx》由会员分享,可在线阅读,更多相关《如何用批处理命令运行组合键.docx(9页珍藏版)》请在冰豆网上搜索。
如何用批处理命令运行组合键
如何用批处理命令运行组合键
悬赏分:
50-解决时间:
2009-5-900:
58
比如用批处理文件打开任务管理器,我想知道的是通过组合键,也就是说这个批处理文件的作用是按住ctrl+Alt+Del
问题补充:
1楼的大哥你复制的我看过了。
。
。
能不能简单说说到底咋写?
?
VBS或者BAT都成------------------------------------------------------------
回二楼大哥的话,小弟知道那种方法,我现在只是打个比方说运行任务管理器,但是如果是别的组合键呢。
比如QQ的ctrl+alt+z呢。
。
。
所以我想知道如何用搞定组合键
提问者:
♂小战♂-五级最佳答案VBS才行模拟键盘输入
SetobjShell=CreateObject("Wscript.Shell")
strCommandLine="ttpsetup.exe"'启动安装程序
objShell.Run(strCommandLine)
setWshShell=CreateObject("WScript.Shell")
WScript.Sleep3000'延时3秒
WshShell.SendKeys"s"'模拟按下S键开始安装
WScript.Sleep300'延时
0.3秒
WshShell.SendKeys"a"'模拟按下A键同意协议
WScript.Sleep300
WshShell.SendKeys"{ENTER}"'模拟按下回车键执行下一步
WScript.Sleep300
WshShell.SendKeys"{ENTER}"'模拟按下回车键执行下一步
WScript.Sleep300
WshShell.SendKeys"{ENTER}"'模拟按下回车键执行下一步
WScript.Sleep2000
WshShell.SendKeys"{TAB}"'模拟按下Tab键选择安装项目
WScript.Sleep300
WshShell.SendKeys"{TAB}"
WScript.Sleep300
WshShell.SendKeys""'模拟按下空格键去除安装XX超级搜霸一行前的√号WScript.Sleep300
WshShell.SendKeys"{ENTER}"'模拟按下回车键完成最后一步
把以上代码复制到记事本中(右边的文字是说明,一起复制也不影响),再另存为AutoSetup.vbs,把此文件存放在千千静听安装执行程序(ttpsetup.exe)同一目录下,双击AutoSetup.vbs即可自动完成千千静听的安装。
成功的关键是,你必须先安装一次千千静听,然后记住每一步的按键是什么,这个文件就可以拿去别的机上执行了。
SendKeys的参数说明:
使用SendKeys方法可以将键击发送到无自动化界面的应用程序中。
多数键盘字符都可用一个键击表示。
某些键盘字符由多个键击组合而成(例如,CTRL+SHIFT+HOME)。
要发送单个键盘字符,请将字符本身作为string参数发送。
例如,要发送字母x,则请发送string参数"x"。
可使用SendKeys同时发送多个键击。
为此,可将每个键击按顺序排列在一起,以此来创建表示一系列键击的复合字符串参数。
例如,要发送键击a、b和c,则需要发送字符串参数"abc"。
SendKeys方法将某些字符用作字符的修饰符(而不使用其本身的含义)。
这组特殊的字符可包括圆括号、中括号、大括号,以及:
加号"+"
插入记号"^"
百分号"%"
和“非”符号"~"
用大括号"{}"括起这些字符可以发送它们。
例如,要发送加号,请使用字符串参数"{+}"。
SendKeys中使用的中括号"[]"无任何特殊含义,但是必须把它们括在大括号中,以便容纳确实要赋予其特殊含义的应用程序(例如,对于动态数据交换(DDE)就是这样)。
要发送左中括号字符,请发送字符串参数"{[}";要发送右中括号字符,请发送字符串参数"{]}"。
要发送左大括号字符,请发送字符串参数"{{}";要发送右大括号字符,请发送字符串参数"{}}"。
某些键击不生成字符(如ENTER和TAB)。
某些键击表示操作(如BACKSPACE和BREAK)。
要发送这些类型的键击,请发送下表中列出的参数:
xx""
退格键{BACKSPACE}或{BS}或{BKSP}
BREAK{BREAK}
DELETE{DELETE}或{DEL}
向下键{DOWN}
向上键{UP}
向左键{LEFT}
向右键{RIGHT}
END{END}
ENTER{ENTER}或~
ESC{ESC}
TAB{TAB}
CAPSLOCK{CAPSLOCK}
HELP{HELP}
HOME{HOME}
INSERT{INSERT}或{INS}
NUMLOCK{NUMLOCK}
PAGEDOWN{PGDN}
PAGEUP{PGUP}
PRINTSCREEN{PRTSC}
SCROLLLOCK{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",则需要发送字符串参数"{x10}"。
请确保在键击和数字之间有一个空格。
注意:
只可以发送重复按一个键的键击。
例如,可以发送10次"x",但不可发送10次"Ctrl+x"。
注意:
不能向应用程序发送PRINTSCREEN键{PRTSC}。
例子1:
关机脚本(模拟按键为:
Ctrl+Esc、u、u)
把以下代码复制至记事本,另存为off.vbs
setWshShell=CreateObject("WScript.Shell")
WshShell.SendKeys"^{ESC}uu"
例子2:
重启脚本(模拟按键为:
Ctrl+Esc、u、r)
把以下代码复制至记事本,另存为reboot.vbs
setWshShell=CreateObject("WScript.Shell")
WshShell.SendKeys"^{ESC}ur"
例子3:
切换输入法(模拟同时按下:
ShiftCtrl)
setWshShell=CreateObject("WScript.Shell")
WshShell.SendKeys"+(^)"
DimWshShell
SetWshShell=WScript.CreateObject("WScript.Shell")
WshShell.Run"notepad"
WScript.Sleep1500
WshShell.AppActivate"无标题-记事本"
WshShell.SendKeys"c"
WScript.Sleep200
WshShell.SendKeys"n"
WScript.Sleep200
WshShell.SendKeys"-"
WScript.Sleep200
WshShell.SendKeys"d"
WScript.Sleep200
WshShell.SendKeys"o"
WScript.Sleep200
WshShell.SendKeys"s"
WScript.Sleep200
WshShell.SendKeys"."
WScript.Sleep200
WshShell.SendKeys"n"
WScript.Sleep200
WshShell.SendKeys"e"
WScript.Sleep200
WshShell.SendKeys"t"
WScript.Sleep200
WshShell.SendKeys"!
"
WScript.Sleep200
WshShell.SendKeys"%FS"
WScript.Sleep500
WshShell.SendKeys"C"
WScript.Sleep200
WshShell.SendKeys"n"
WScript.Sleep200
WshShell.SendKeys"D"
WScript.Sleep200
WshShell.SendKeys"o"
WScript.Sleep200
WshShell.SendKeys"s"
WScript.Sleep200
WshShell.SendKeys"%S"
WScript.Sleep500
WshShell.SendKeys"%FX"
例子5:
自动定时存盘的记事本(此脚本来自网上)
'第一部分:
定义变量和对象
DimWshShell,AutoSaveTime,TXTFileName
AutoSaveTime=(1000*60*1)'自动存盘时间为1分钟
SetWshShell=WScript.CreateObject("WScript.Shell")
TXTFileName=InputBox("给文本起名(不能用中文和纯数字):
")
'第二部分:
打开并激活记事本
WshShell.Run"notepad"
WScript.Sleep200
WshShell.AppActivate"无标题-记事本"
'第三部分:
用输入的文件名存盘
WshShell.SendKeys"^s"
WScript.Sleep300
WshShell.SendKeysTXTFileName
WScript.Sleep300
WshShell.SendKeys"%s"
WScript.SleepAutoSaveTime
'第四部分:
自动定时存盘
WhileWshShell.AppActivate(TXTFileName)=True
WshShell.SendKeys"^s"
WScript.SleepAutoSaveTime
Wend
WScript.Quit
例子:
setobjShell=CreateObject("Wscript.Shell")
strCommandLine="psetup
755281.exe"'启动安装程序
objShell.Run(strCommandLine)
setWshShell=CreateObject("WScript.Shell")
WScript.Sleep2000'延时3秒
WshShell.SendKeys"{ENTER}"'模拟按下回车键执行下一步
WScript.Sleep300'延时3秒
WshShell.SendKeys"{ENTER}"'模拟按下回车键执行下一步
WScript.Sleep300'延时3秒
WshShell.SendKeys"{ENTER}"'模拟按下回车键执行下一步
WScript.Sleep5200'延时3秒
WshShell.SendKeys"{ENTER}"'模拟按下回车键执行下一步
WScript.Sleep300'延时3秒
WshShell.SendKeys"{ENTER}"'模拟按下回车键执行下一步
WScript.Sleep300'延时3秒
WshShell.SendKeys"{ENTER}"'模拟按下回车键执行下一步
WScript.Sleep200
WshShell.SendKeys""'模拟按下空格键去除安装XX超级搜霸一行前的√号WScript.Sleep100
WshShell.SendKeys"{TAB}"'模拟按下Tab键选择安装项目
WScript.Sleep200
WshShell.SendKeys""'模拟按下空格键去除安装XX超级搜霸一行前的√号WScript.Sleep200'延时
0.3秒
WshShell.SendKeys"f"'模拟按下F键同意协议