记录一下使用vbs脚本实现cmd一键ssh连接服务器

新建TXT文档填入配置以下内容

Dim WshShell
Set WshShell=Wscript.CreateObject(“Wscript.Shell”)
WshShell.Run “cmd.exe”
Wscript.Sleep 400
WshShell.SendKeys “ssh root@此处为IP”
WshShell.SendKeys “{ENTER}”
Wscript.Sleep 3500
WshShell.SendKeys “此处为密码：Password”
WshShell.SendKeys “{ENTER}”

修改尾缀为vbs