计算机/网络设备状态监测脚本 批处理

以前自己写的一个监控脚本，每隔10秒使用PING命令检查一个IP列表中的IP，如果不通，则通过messenger消息发送，并使用BEEP发出报警声。需要文件sleep.exe（可到网上下一个）、BEEP.EXE（自己用DELPHI写的，不必需，代码可去掉，也可以去网上找一个），再建立文件ip.txt,user.txt，运行脚本即可。

rem main.bat  
@echo off  
for /F "eol=; tokens=1,2* delims==" %%i in (ip.TXT) do call :checkip %%i %%j 0  
echo --------------------------------------------------------------  
echo ----第一轮检查完毕,如果没有听到报警声,表示各IP都可以PING通----  
echo ----如果有异常的IP,请再手动使用PING命令,以确认检查的正确性----  
echo ----       现在进行循环检查,每隔10000ms检查一个IP         ----  
echo --------------------------------------------------------------  
:begin  
for /F "eol=; tokens=1,2* delims==" %%i in (ip.TXT) do call :checkip %%i %%j 10000  
goto begin  

:checkip  

@echo off  
PING %1 -n 1 | FIND "TTL=" >NUL  
IF NOT ERRORLEVEL 1 ECHO %1(%2) Status OK at %TIME%  
IF NOT ERRORLEVEL 1 GOTO NEXT  
PING %1 -n 1 -w 3000 | FIND "TTL=" >NUL  
if %ERRORLEVEL%==1 call :send %1 %2 ELSE ECHO %1(%2) Status OK at %TIME%  
:Next  
sleep %3  
goto end  

:send  
@echo off  
ECHO %1(%2):::::Status ERROR at %TIME%:::::  
for /F "eol=;" %%i in (user.TXT) do net send %%i "Error Pinging %1(%2)." >NUL  
Beep 1500 500  
Beep 500 500  
Beep 1500 500  
Beep 500 500  
goto end  

:end 

;ip.txt,关键IP,一行一个IP，等号后面可输入名称
192.168.0.1=集团网关
192.168.0.123=test

;user.txt，计算机名或IP，检测到网络不通时，发送消息给文中的用户
computername