#$language = "VBScript"
#$interface = "1.0"
'SSH自动连接

Sub Main
crt.Screen.Synchronous = True

IP2 = inputbox("请输入IP地址","提示信息")
IP=""&IP2
'IP="172.16.0."&IP2
'IP="192.168.0."&IP2
strconnect="/SSH2 /L admin /PASSWORD admin_default " & IP
crt.session.connectInTab(strconnect)

crt.Screen.Synchronous = False


End Sub