Windows 调度程序无法向 putty 发送命令

Question

我以管理员身份登录到winserver2008服务器。

我创建了一个名为：vbscript.vbs 的脚本，

该脚本的目的是通过putty 自动登录linux，然后执行命令行任务。

Dim  Shell
Set Shell   = CreateObject("WScript.Shell")

output = Shell.Run("C:\putty.exe 1.2.3.4 9321")
wscript.sleep(500)

Shell.Sendkeys "root" & VBCrLf
wscript.sleep(30)

Shell.Sendkeys "password"  & VBCrLf
wscript.sleep(30)

当我手动点击vbscript.vbs来执行它时，vbscript会将root和密码填写到putty中。

当我使用 Windows 调度程序调用 vbscript.vbs 来执行它时，vbscript 不会将 root 和密码填写到 putty 中。

我怀疑存在一些权限问题。 我已经将 putty.exe 设置为以管理员身份运行，允许管理员、管理员组权限，但通过 Windows 调度程序调用时仍然无法工作。

=====

我刚刚尝试了第二种情况，将 2 发送到 Windows 计算器，也失败了..

testcalc.vbs

Set objShell = WScript.CreateObject("WScript.Shell")
objShell.Run "Calc.exe"
objShell.AppActivate "Calculator"
objShell.SendKeys "2"

Answer 1

放弃尝试让 SendKeys 在计划任务中工作，这是不会发生的。相反，只需在命令行上传递登录名和密码即可：

output = Shell.Run("C:\putty.exe -l root -pw password 1.2.3.4 9321")

或者使用会话文件并使用 -load 来完成此操作。

如果您要通过此连接执行命令，那么我相信您实际上需要 plink 而不是 putty。