批处理之家 - Powered by Discuz! Board

标题: [问题求助] [已解决]求解一个sendkeys的用法 [打印本页]

作者: guaiwu 时间: 2011-8-17 22:41 标题: [已解决]求解一个sendkeys的用法

我想每次开机都不用自动去启动QQ，所以编了个vbs，但是写过好多次，之前也成功过，但是后来靠自己的记忆重新写了，又出错了，现在好纳闷都不知道出错在哪里。
之前有个人提醒多家一层""现在我是加上了，可还是报错，现在的问题是出在哪里?

Dim wav
Set wav=WScript.CreateObject("WScript.Shell")
wav.Run ""C:\Program Files\Tencent\QQ\Bin\QQ.exe""
wscript.sleep 5000
wav.sendkeys "{Enter}"
复制代码

作者: vsbat 时间: 2011-8-17 23:51

Dim wav
Set wav=WScript.CreateObject("WScript.Shell")
wav.Run """C:\Program Files\Tencent\QQ\Bin\QQ.exe"""
wscript.sleep 5000
wav.sendkeys "{Enter}"

" 用 " 转义

作者: Hello123World 时间: 2011-8-18 14:49

Dim wav
Set wav=WScript.CreateObject("WScript.Shell")
wav.Run """C:\Program Files\Tencent\QQ\Bin\QQ.exe"""
wscript.sleep 5000
wav.sendkeys "{Enter}"
复制代码

::两对双引号用来转义空格，剩下的一对用来表示strcommand是字符串型。

语法：

object.Run(strCommand, [intWindowStyle], [bWaitOnReturn]) 
参数
object 
WshShell 对象。 
strCommand 
表示要运行的命令行的字符串值。必须包括要传递到可执行文件的所有参数。 
复制代码

::也就是说要运行的路径是被当做字符串处理的，所以要用双引号括起。——运行含空格的路径要用三对双引号。

欢迎光临批处理之家 (http://bathome.net./)