給公司寫的,情況如下.公司使用雙ADSL,雙路由.一個路由IP為1.一個IP路由為2.另外還有區域網伺服器5.因為線路老化與接觸不良有時候發生斷線.於是寫個了程式自動檢測.線路.功能如下:1.診斷內部192.168.1.1 ,2 ,5三臺伺服器網路連線..通過路由1.2.分別連線外網診斷DSL連線.2.線路延遲過大或者中斷時閃屏併發出報警聲.3.帶錯誤日誌功能,將錯誤內容登記入失敗日誌.

路由通路已通過路由靜態路由表跳躍.兩次測試分別通過兩個路由.
本來可以用ROUTE設定本機路由的.不過嫌麻煩就直接在路由器寫了靜態路由.

@title 廣州XXXXXXXXXX公司網路測試工具
@echo off
mode con: cols=60 lines=40
echo ┌───────────────────────────┐
echo │ 廣州XXXXXXXXXX公司網路測試工具 0.1  只適於該公司網路 │
echo ├───────────────────────────┤
echo │ 製作:XXXXXX  沒有版權 盜版找死 MSN:

[email protected]  │
echo └───────────────────────────┘
set ip=192.168.1.1
:contest
ping %ip% -n 2 -w 1000 >plong.txt
IF %ERRORLEVEL% == 0 goto pass
IF %ERRORLEVEL% == 1 goto fail
:pass
echo 連線%IP%成功,通訊網路正常...  %time%
echo.
:change
ping 0.0.0.1 -n 1 -w 500 >nul
if %ip% == 192.168.1.1 (set ip=192.168.1.5 & goto contest)
if %ip% == 192.168.1.5 (set ip=192.168.1.2 & goto contest)
if %ip% == 192.168.1.2 (set ip=203.208.37.104 & goto contest)
if %ip% == 203.208.37.104 (set ip=219.111.11.11 & goto contest)
if %ip% == 219.111.11.11 (set ip=192.168.1.1 & goto contest)
:fail
echo. >>conlog.txt
echo %date%%time%連線%ip%失敗,詳細內容如下>>conlog.txt
copy conlog.txt+plong.txt >nul
echo ----------------------->>conlog.txt
echo 連線%ip%失敗,警報器啟動,請檢查網路連線.%time%
echo & color 46 & color e1 & color f1
ping 0.0.0.1 -n 1 -w 500 >nul
echo & color b7 & color a7 & color 76
ping 0.0.0.1 -n 1 -w 500 >nul
echo & color fa & color d2 & color c3
color
echo 已暫時忽略該錯誤,繼續連線測試.錯誤已記錄,請查閱conlog.txt
goto change