網絡丟包自動測試並記錄

@echo on
setlocal ENABLEDELAYEDEXPANSION
set ipadd=10.12.100.212
set stepTime=5
set logFile=d:\pingLog.txt
set fval=30
set size=32

:goon
ping -n %stepTime% 127.1>nul
for /f "tokens=5 delims= " %%a in ('ping -l %size% %ipadd% -n 1^|findstr /c:"時間"') do (
set t=%%a
goto :test
)
goto :error1

:test
echo 檢測結果: %t%
set t=!t:~3!
set t=!t:ms=!
if !t! GEQ %fval% (goto :error2)
goto :goon

:error1
echo 記錄訪問超時 %t%
echo %date% %time% 訪問超時 %ipadd% >>%logFile%
goto :goon

:error2
echo 記錄延時結果 %t% 大於等於設定閾值 %fval%
echo %date% %time% 訪問延時 %ipadd% !t! ms>>%logFile%
goto :goon