#$language = "VBScript"
#$interface = "1.0"
' by [email=koseidon@ITAA]koseidon@ITAA[/email]
Sub main
   crt.Screen.Synchronous = True
   crt.Screen.WaitForString "Console port"
   crt.Screen.Send  VbCr
   crt.Screen.WaitForString("[yes/no]:")  
   crt.Screen.Send "no" & VbCr
   crt.Screen.Send VbCr
   crt.Screen.WaitForString "Router>"   
   crt.Screen.Send  "enable" & VbCr
   crt.Screen.Send "conf terminal" & VbCr
   crt.Screen.Send "no ip domain-lookup " & VbCr
   crt.Screen.Send "line con 0" & VbCr   
   crt.Screen.Send "exec-timeout 0 0" & VbCr   
   crt.Screen.Send "logging synchronous" & VbCr
   crt.Screen.Send "hostname "
   
   crt.Screen.Synchronous = False
  
End Sub


使用方法：


顺便把字体和颜色也改了

脚本下载：
uploads/20070922_123429_initial_config.rar

l@si& 不错不错

好东西,谢谢分享了!