VBA 使用 plink（Putty 的命令行）远程登录 - 将命令发送到 plink.exe

Question

我想要：

1. 使用 VBA 作为 TCP/IP 客户端连接到某些机器。
2. 向它发送命令 - 说“帮助”+ vbcrlf
3. 将回复捕获到剪贴板或文件中，然后我可以将它们都粘贴到工作表中
4. 这部分真的让我感到困惑 - 使用.run和.exec，我无法弄清楚如何发送“帮助”+回车。 我可以打开 shell window，但无法让 StdIn 向 plink.exe 发送命令。

我还没有走远：

Sub Test1()

    Const TARGET_HOST = "192.168.0.2 -P 24" ' Some proprietary telnet port 
    Const PLINKPATH = "C:\program files\putty\plink.exe"

    Set sh = CreateObject("WScript.Shell")
    cmd = """C:\program files\putty\plink.exe"" -telnet " & TARGET_HOST

    sh.Run cmd & " | clip", 1, True

End Sub

如果这种方法不是向 plink.exe 发送命令的正确方法，那么还可以使用哪些其他方法而不必使用难以维持前进的 winsock 方法。

Answer 1

您可以使用简单的输入重定向。 您实际上已经使用| clip重定向了 output | clip 。 与重定向输入类似，请执行以下操作：

"echo help | " & cmd & " | clip"

---

另请参阅如何通过 Telnet 使用 PuTTY 执行远程命令。