secureCRT自动登录配置脚本

最新推荐文章于 2025-03-01 20:47:13 发布

原创最新推荐文章于 2025-03-01 20:47:13 发布 · 5.8k 阅读

0 ·

本内容遵循CC 4.0 BY-SA版权协议

标签

#vbscript #input #interface #脚本 #ssh

Other 专栏收录该内容

4 篇文章

订阅专栏

本文介绍了一个使用VBScript编写的脚本示例，该脚本用于自动化SSH登录过程，包括输入用户名、密码及执行特定命令等操作。

#filename: fk3.vbs

#$language = "VBScript"
#$interface = "1.0"

Sub main
crt.Screen.Synchronous = True

crt.Screen.WaitForString "ogin: "
crt.Screen.Send "huz" & VbCr

crt.Screen.WaitForString "assword:"
crt.Screen.Send "cxwh123!" & VbCr

crt.Screen.WaitForString ">"
crt.Screen.Send "ssh cxhz@109.243.211.203" & VbCr
crt.Screen.WaitForString "assword:"
crt.Screen.Send "cxwh0755" & VbCr

crt.Screen.WaitForString "Input device: "
crt.Screen.Send "162" & VbCr
crt.Screen.WaitForString "Input accounts:"
crt.Screen.Send "5" & VbCr

crt.Screen.WaitForString "S2-E-YZ-WANGGUAN's username:"
crt.Screen.Send "cxhz" & VbCr
crt.Screen.WaitForString "assword:"
crt.Screen.Send "kzh0755" & VbCr

crt.Screen.WaitForString ">"
crt.Screen.Send "telnet 109.243.210.46" & VbCr
crt.Screen.WaitForString "ogin: "
crt.Screen.Send "cxhz" & VbCr
crt.Screen.WaitForString "assword:"
crt.Screen.Send "hzh777" & VbCr

crt.Screen.WaitForString "#"
crt.Screen.Send "set -o vi" & VbCr
crt.Screen.Send "TMOUT=0" & VbCr
crt.Screen.Synchronous = False

End Sub