#$language = “VBScript”
#$interface = “1.0”
crt.Screen.Synchronous = True
myScreenString= inputbox(“系统命令行提示符为”,”命令行提示符”)
‘ This automatically generated script may need to be
‘ edited in order to work correctly.
Sub Main
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “hostname” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “date” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “head -n 1 /etc/issue” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “uname -a” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “uptime” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “lspci -tv” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “lsusb -tv” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “lsmod” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “env” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “crontab -l” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “cat /proc/cpuinfo” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “lscpu” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
‘’ crt.Screen.Send “getconf LONG_BIT” & chr(13)
‘ crt.Sleep 2000
‘’ crt.Screen.Send chr(13)
‘’ crt.Screen.Send chr(13)
crt.Screen.Send “sar -P ALL” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “mpstat -P ALL” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “cat /proc/loadavg” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “free -h” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “swapon -s” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “cat /proc/meminfo” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “lsmem” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “df -h” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “df -ah” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “fdisk -l” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “lsblk” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “blkid” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “multipath -ll” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “multipath -v3” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “lshw” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “mount | column -t” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “chkconfig –list && chkconfig –list | grep on” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “ps && ps -ef && ps axu” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “iptables -L” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “ifconfig” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “route && route -n” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “netstat -lntp && netstat -antp && netstat -s” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “who && w” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “lslogins” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “lastlog” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “last” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “cat /etc/passwd” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “cat /etc/shadow” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “grep error /var/log/boot.log” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “grep error /var/log/secure” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “grep error /var/log/dmesg” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send “top -n 1 && top -i -n 1” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send “top -n 1 && top -i -n 1” & chr(13)
‘ crt.Sleep 2000
crt.Screen.Send “top -n 1 && top -i -n 1” & chr(13)
crt.Screen.Send chr(13)
crt.Screen.Send chr(13)
End Sub