vbs脚本教程二(上下)

vbs脚本教程二(上下)

ID:6378398

大小:64.50 KB

页数:40页

时间:2018-01-12

vbs脚本教程二(上下)_第1页
vbs脚本教程二(上下)_第2页
vbs脚本教程二(上下)_第3页
vbs脚本教程二(上下)_第4页
vbs脚本教程二(上下)_第5页
资源描述:

《vbs脚本教程二(上下)》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库

1、VBS脚本教程二(上)◎Vbs脚本编程简明教程之九—妙用SendKeys简化重复操作    每次开机的时候,你想自动登陆你的QQ或者网志吗?巧妙使用VBS中的SendKeys命令(这个命令的作用就是模拟键盘操作,将一个或多个按键指令发送到指定Windows窗口来控制应用程序运行),可以极大的方便我们的常用操作。其使用格式为:Object.SendKeysstring其中:Object:为WshShell对象,即脚本的第一行为:SetWshShell=WScript.CreateObject("WScript.Shell")将Object替换为WshShell

2、“string”:表示要发送的按键指令字符串,需要放在英文双引号中。它包含如下内容:.1.基本键:一般来说,要发送的按键指令都可以直接用该按键字符本身来表示,例如要发送字母“x”,使用“WshShell.SendKeys"x"”即可。当然,也可直接发送多个按键指令,只需要将按键字符按顺序排列在一起即可,例如,要发送按键“cfan”,可以使用“WshShell.SendKeys"cfan"”。2.特殊功能键:对于需要与Shift、Ctrl、Alt三个控制键组合的按键,SendKeys使用特殊字符来表示:Shift——+;Ctrl——^;Alt——%如要发送的组

3、合按键是同时按下Ctrl+E,需要用“WshShell.SendKeys"^e"”表示,如果要发送的组合按键是按住Ctrl键的同时按下E与C两个键,这时应使用小括号把字母键括起来,书写格式为“WshShell.SendKeys"^(ec)"”,这里要注意它与“WshShell.SendKeys"^ec"”的区别,后者表示组合按键是同时按住Ctrl和E键,然后松开Ctrl键,单独按下“C”字母键。由于“+”、“^”这些字符用来表示特殊的控制按键了,如何表示这些按键呢?只要用大括号括住这些字符即可。例如,要发送加号“+”,可使用“WshShell.SendKey

4、s"{+}"”。另外对于一些不会生成字符的控制功能按键,也同样需要使用大括号括起来按键的名称,例如要发送回车键,需要用“WshShell.SendKeys"{ENTER}"”表示,发送向下的方向键用“WshShell.SendKeys"{DOWN}"”表示。如果需要发送多个重复的单字母按键,不必重复输入该字母,SendKeys允许使用简化格式进行描述,使用格式为“{按键数字}”。例如要发送10个字母“x”,则输入“WshShell.SendKeys"{x10}"”即可。例一:WshShell.SendKeys"^{ESC}u".代码的含义为:按下Ctrl+E

5、sc组合键(相当于按Win键)打开“开始”菜单,接着按U键打开“关机”菜单。例二:让VBS脚本自动在记事本中输入一行文字“hello,welcometocfan”。DimWshShellSetWshShell=WScript.CreateObject("WScript.Shell")WshShell.Run"notepad"WScript.Sleep2000//本行的含义为是脚本暂停2秒,给notepad一个打开的时间,有时时间太短可能导致后面的字符无法进入编辑区WshShell.AppActivate"无标题-记事本"//AppActivate为寻找可执行

6、程序的标题框,”无标题-记事本”内容你的自己打开看一下WshShell.SendKeys"hello,welcometocfan"作业1:让脚本自动输入下面两段小短句ThisisthemostwonderfuldayofmylifebecauseI'mherewithyounow作业2:让脚本在输入短句后自动关闭记事本,并保存文件名为“test”,注意关闭记事本可以直接使用组合按键Alt+F4来实现例三:制作能自动定时存盘的记事本我们最常用的记事本没有Word、WPS那样的自动定时存盘功能,其实利用VBS脚本再加上SendKeys命令,就能弥补这个遗憾。打开

7、记事本,输入以下内容(为容易描述和分析,把代码分为四个部分):'第一部分:定义变量和对象DimWshSh.ell,AutoSaveTime,TXTFileNameAutoSaveTime=300000SetWshShell=WScript.CreateObject("WScript.Shell")TXTFileName=InputBox("请输入你要创建的文件名(不能用中文和纯数字):")'第二部分:打开并激活记事本WshShell.Run"notepad"WScript.Sleep200WshShell.AppActivate"无标题-记事本"'第三部分:

8、用输入的文件名存盘WshShell.SendKeys

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。