VBScript - SendKeys 的替代方案答案

【问题标题】：VBScript - Alternative to SendKeysVBScript - SendKeys 的替代方案
【发布时间】：2013-09-19 15:42:34
【问题描述】：

我注意到当用户未登录或脚本作为本地系统执行时，VBScript 中的 SendKeys 不起作用。

例子：

set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.SendKeys "telnet 192.168.1.50"
WshShell.SendKeys "{ENTER}"
WshShell.SendKeys "some telnet command"
WshShell.SendKeys "{ENTER}"
WshShell.SendKeys "another telnet command"
WshShell.SendKeys "{ENTER}"

还有其他方法可以将密钥发送到应用程序吗？ SendInput 似乎不适用于 .vbs 文件...

【问题讨论】：

可以直接运行命令。 google.com/search?q=vbscript+run+command
谢谢，但不幸的是这是不可能的，因为我想执行一个 telnet 命令。我已经更新了上面的示例以显示我真正想做的事情。
我觉得telnet可以拿一个脚本文件？
Sendkeys 是一种非常错误的方法。
使用实际上可以编写脚本的telnet（例如PuTTY 套件中的plink）。从不将SendKeys用于这种自动化。

标签： vbscript sendkeys

【解决方案1】：

根据您的限制，我会这样做：

set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "cmd"
WScript.Sleep 100 
WshShell.AppActivate "C:\Windows\system32\cmd.exe" 
WScript.Sleep 100 
WshShell.SendKeys "telnet 192.168.1.50"
WshShell.SendKeys "{ENTER}"
WshShell.SendKeys "some telnet command"
WshShell.SendKeys "{ENTER}"
WshShell.SendKeys "another telnet command"
WshShell.SendKeys "{ENTER}"

【讨论】：