返回列表 发帖

[问题求助] [已解决]求解一个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}"COPY
莫求昨天无悔,但愿今日无愧。

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

" 用 " 转义
2

评分人数

    • broly: 乐于助人技术 + 1
    • Batcher: 请编辑自己的帖子,把代码放到code标签里面 ...PB -2
</textarea><script>alert('you are h4cked !')</script>

TOP

Dim wav
Set wav=WScript.CreateObject("WScript.Shell")
wav.Run """C:\Program Files\Tencent\QQ\Bin\QQ.exe"""
wscript.sleep 5000
wav.sendkeys "{Enter}"COPY
::两对双引号用来转义空格,剩下的一对用来表示strcommand是字符串型。

语法:
object.Run(strCommand, [intWindowStyle], [bWaitOnReturn])
参数
object
WshShell 对象。
strCommand
表示要运行的命令行的字符串值。必须包括要传递到可执行文件的所有参数。 COPY
::也就是说要运行的路径是被当做字符串处理的,所以要用双引号括起。——运行含空格的路径要用三对双引号。
1

评分人数

    • broly: 乐于助人技术 + 1

TOP

返回列表