# $language = "VBScript"
# $interface = "1.0"
Sub Command(comm)
	crt.screen.send comm & chr(13)
	crt.screen.WaitForString "#"
End Sub
Sub Command1(comm)
	crt.screen.send comm & chr(13)
	crt.screen.WaitForString ">"
End Sub
Sub Main
crt.Screen.Synchronous = False

    Command "enable"	
	Command "end"
    Command "enable"
	Command "terminal length 0"
	Command "低端交换机信息收集开始"
	Command "第一部分：软件版本"
	Command "show ver"
	Command "show version slot"
	Command "show run"
	Command "等待1秒"
        crt.sleep 1000
	Command "第二部分：软件调试"
	Command "第二部分：软件调试--端口配置--接口配置规范"
	Command "show interfaces counters errors"
	Command "show interfaces status"
	Command "等待2秒"
        crt.sleep 2000
	Command "show interfaces counters summary"
	Command "show interfaces counters rate"
        crt.sleep 1000
	Command "第二部分：软件调试--生成树功能-生成树模式"
	Command "show spanning-tree"
	Command "第二部分：软件调试--生成树功能-生成树优先级控制"
	Command "show spanning-tree summary"
	Command "show spanning-tree"
	Command "show spanning-tree counters"
	Command "第二部分：软件调试--生成树功能-生成树优化"
	Command "等待1秒"
        crt.sleep 1000
	Command "第二部分：软件调试--NFPP配置-ARP-Guard"
	Command "show nfpp arp-guard summary"
	Command "show nfpp arp-guard hosts"
	Command "show nfpp arp-guard scan"
	Command "show nfpp log buffer"
	Command "第二部分：软件调试--NFPP配置-DHCP-Guard"
	Command "show nfpp dhcp-guard summary"
	Command "show nfpp dhcp-guard hosts"
        crt.sleep 1000
	Command "第三部分：可靠性实施检查"
	Command "第三部分：可靠性实施检查--VSU--VSL链路"
	Command "show switch virtual link port"
	Command "show switch virtual link"
	Command "show switch virtual"
	Command "show switch virtual config"
	Command "第三部分：可靠性实施检查--VSU--双主机检测"
	Command "show switch virtual config"
	Command "show switch virtual dual-active summary"
	Command "show switch virtual dual-active bfd"
	Command "第三部分：可靠性实施检查-VSU--跨机箱AP或ECMP"
	Command "show aggregatePort summary"
	Command "第三部分：可靠性实施检查--链路聚合"
	Command "show aggregatePort summary"
	Command "show lacp summary"
	Command "show aggregatePort load-balance"
	Command "第四部分：基本运行状态"
	Command "show temperature"
        Command "show fan"
        Command "show power"
        Command "show debugging"
	Command "show cpu"
	Command "show cpu-protect mboard"
	Command "等待3秒"
        crt.sleep 3000
	Command "show cpu"
	Command "show cpu-protect mboard"
	Command "等待3秒"
        crt.sleep 3000
	Command "show cpu"
	Command "show cpu-protect mboard"
	Command "show memory"
	Command "等待1秒"
        crt.sleep 1000
	Command "show memory"
	Command "等待1秒"
        crt.sleep 1000
	Command "show memory"
        Command "more config.text"
        Command "等待1秒"
        crt.sleep 1000	
	Command "show logging"
	Command "等待3秒"
        crt.sleep 3000	
	Command "debug support"
	Command "show exception"
	Command "exit"
	Command "收集扩展信息"
        Command "show interfaces transceiver"
        Command "show interfaces transceiver diagnosis"
        Command "等待2秒"
        crt.sleep 2000
	Command "show ip route"
	Command "等待2秒"
        crt.sleep 2000
	Command "show ip route count"
	Command "show arp count"
	Command "show mac-address-table count"
	Command "信息收集结束"
	Command "等待1秒"
        crt.sleep 1000
        Command "terminal length 25"

End Sub  
