1. 程式人生 > >SecureCRT VBS指令碼自動登入伺服器

SecureCRT VBS指令碼自動登入伺服器

指令碼內容如下所示

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

crt.Screen.Synchronous = True
Sub Main
	'獲取會話的名字
	tab_title = crt.GetScriptTab().Caption
	arrs=split(tab_title," ")
	
	'等待出現字元 INPUT
	crt.Screen.WaitForString"INPUT"
	crt.Screen.Send arrs(0) & chr(13)
	
	crt.Screen.WaitForString"login"
	crt.Screen.Send "cd " & crt.Arguments(0) & chr(13)
End Sub

 

crt.GetScriptTab().Caption 是獲取會話的標題,比如"127.0.1.1 服務A"

等待螢幕出現特定的字元後,輸入從標題提取的IP

繼續等待出現特定字元,輸入引數列表的工作目錄