从 hta 按钮启动 plink-ssh 连接并将值传递给 ssh 命令

Question

我的 HTA-vbs 脚本有点问题。

这是我的 VBS 脚本：

strInput = UserInput( "USER:" )
pswInput = UserInput( "PSW:" )

Function UserInput( myPrompt )
       UserInput = InputBox( myPrompt )
End Function

Set objShell = CreateObject("Wscript.Shell")

        objShell.Run "plink.exe &  USER@192.0.0.1 -pw PASSWORD -no-antispoof "myscript.sh"

所以这是一个简单的 vbs 脚本，它在我的 linux 远程机器上启动脚本（我从 HTA 按钮启动它）。我只需要在初始文本框中键入用户名和密码时，脚本会保存该值并在启动 ssh 连接时替换 USER 和 PASSWORD。

可以吗？

非常感谢。再见！安杰洛

Answer 1

像这样的东西应该可以工作：

Dim sUserName
Dim sPassword
Dim objShell
Dim sCommand

sUserName = InputBox("USER:")
sPassword = InputBox("PSW:")

Set objShell = CreateObject("Wscript.Shell")

sCommand = "plink.exe " & sUserName & "@192.0.0.1 -pw " & sPassword & " -no-antispoof ""myscript.sh"""
objShell.Run sCommand

不需要UserInput函数，直接调用InputBox即可。

如果您想保存用户名和密码变量，也有一些方法可以做到，您可以将它们预先填充到您的 InputBox:

' Set default values or perhaps read these from the Registry
sUserName = "admin"
sPassword = "password"

sUserName = InputBox("USER:", "Remote Connection", sUserName)
sPassword = InputBox("PSW:", "Remote Connection", sPassword)

从 hta 按钮启动 plink-ssh 连接并将值传递给 ssh 命令

start plink-ssh connection from hta button and pass value to ssh command

html

ssh

vbscript

plink

hta