我正在竭尽全力去做一些看起来很简单的事情，但是我只是机智。

我真的还没走远：

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

所以，我要做的是：

1. 使用VBA作为TCP / IP客户端连接到某些计算机。
2. 发送命令-说“帮助” + vbcrlf
3. 将回复捕获到剪贴板或文件中，然后我都可以将其粘贴到工作表中
4. 这部分确实让我感到困惑-使用.run和.exec，我似乎无法弄清楚如何发送“帮助” +回车符。我可以打开外壳程序窗口，但无法获取StdIn来向plink.exe发送命令。

在此先感谢您能帮助我的任何人。如果此方法不是将命令发送到plink.exe的正确方法，请建议可以使用哪些其他方法，而不必使用winsock方法，该方法很难维护。