作者：    来源：    点击：    日期：2007-7-7 0:57:53   

上手实例：关机菜单立刻显身
打开记事本，输入以下命令，并将其保存为1.vbs：
set WshShell = CreateObject("WScript.Shell")
WshShell.SendKeys "^{ESC}u"
双击运行它，你会发现关机菜单立刻出现了。
Just Do It
将“WshShell.SendKeys "^{ESC}u"”改为“WshShell.SendKeys "^+{ESC}"”，运行一下看看效果。
知其所以然  SendKeys功能和使用
上面实例中，我们运用了SendKeys命令，简单说，这个命令就是模拟键盘操作，将一个或多个按键指令发送到指定Windows窗口来控制应用程序运行，其使用格式为：
object.SendKeys string
“object”：表示WshShell对象，《菜鸟也来编程序》一文中已有过介绍。
“string”：表示要发送的按键指令字符串，需要放在英文双引号中。
1.基本键
一般来说，要发送的按键指令都可以直接用该按键字符本身来表示，例如要发送字母“x”，使用“WshShell.SendKeys "x"”即可。当然，也可直接发送多个按键指令，只需要将按键字符按顺序排列在一起即可，例如，要发送按键“cfan”，可以使用“WshShell.SendKeys "cfan"”。
2.特殊功能键
对于需要与Shift、Ctrl、Alt三个控制键组合的按键，SendKeys使用特殊字符来表示：
特殊控制键                 特殊字符
Shift                              +
Ctrl                               ^
Alt                                %
如要发送的组合按键是同时按下Ctrl＋E，需要用“WshShell.SendKeys "^e"”表示，如果要发送的组合按键是按住Ctrl键的同时按下E与C两个键，这时应使用小括号把字母键括起来，书写格式为“WshShell.SendKeys "^(ec)"”，这里要注意它与“WshShell.SendKeys "^ec"”的区别，后者表示组合按键是同时按住Ctrl和E键，然后松开Ctrl键，单独按下“C”字母键。
由于“+”、“^”这些字符用来表示特殊的控制按键了，如何表示这些按键呢？只要用大括号括住这些字符即可。例如，要发送加号“+”，可使用“WshShell.SendKeys "{+}"”。另外对于一些不会生成字符的控制功能按键，也同样需要使用大括号括起来按键的名称，例如要发送回车键，需要用“WshShell.SendKeys "{ENTER}"”表示，发送向下的方向键用“WshShell.SendKeys "{DOWN}"”表示。
小提示
如果需要发送多个重复的单字母按键，不必重复输入该字母，SendKeys允许使用简化格式进行描述，使用格式为“{按键 数字}”。例如要发送10个字母“x”，则输入“WshShell.SendKeys "{x 10}"”即可。
3.翻译上手实例
“WshShell.SendKeys "^{ESC}u"”这句翻译为：按下Ctrl＋Esc组合键（相当于按Win键）打开“开始”菜单，接着按U键打开“关机”菜单。
Just Do It
★让VBS脚本自动在记事本中输入一行文字“hello, welcome to cfan”。
Dim WshShell
Set WshShell=WScript.CreateObject("WScript.Shell")
WshShell.Run "notepad"
WScript.Sleep 200
WshShell.AppActivate "无标题 - 记事本"
WshShell.SendKeys "hello, welcome to cfan"
★请改造这个脚本，让它自动输入下面两段小短句，注意前面介绍的回车键发送方法哦。
This is the most wonderful day of my life
because I'm here with you now
★让脚本在输入短句后自动关闭记事本，并保存文件名为“test”，注意关闭记事本可以直接使用组合按键Alt＋F4来实现。

首页 上一页 [1] [2]  下一页 尾页