回复 1# wangdao6699
- @echo off&setlocal enabledelayedexpansion
- for /f "delims=" %%i in ('type "%~dp0\1.txt"')do ping/n "1" "%%~i" >nul 2>nul&&(
- for /f "delims=" %%j in ('ping "%%~i"^|findstr/n .')do (
- for /f "delims=:" %%k in ("%%j")do if %%k geq 3 if %%k neq 8 if %%k neq 10 (
- set "#%%i#_name#=%%j"
- set "#%%i#_name#=!#%%i#_name#:<=!"
- set "#%%i#_name#=!#%%i#_name#:>=!"
- set "#%%i#_name#=!#%%i#_name#: (=(!"
- set "#%%i#_name#=!#%%i#_name#: =\!"
- set "#%%i#_name#=!#%%i#_name#:ms=!"
- set "#%%i#_name#=!#%%i#_name#:s=!"
- if %%k geq 3 if %%k leq 6 (
- rem::echo,!#%%i#_name#!
- )else if %%k equ 9 (
- for /f "delims=(" %%l in ("!#%%i#_name#!")do (
- rem::echo,%%i丢失:%%~nxl
- set "#%%i#_if1#=%%~nxl"
- )
- )else if %%k equ 11 (
- for /f "delims=(" %%l in ("!#%%i#_name#!")do (
- rem::echo,%%i平均速率:%%~nxl
- set "#%%i#_if2#=%%~nxl"
- )
- )
- rem::此行为判断行并导出实体数据
- if !#%%i#_if1#! equ 0 if !#%%i#_if2#! leq 100 if not defined #%%i# (
- set/a "#%%i#_number+=1"
- if !#%%i#_number! geq 6 (
- set "#%%i#=yes"
- (echo,i p: %%i
- echo,速率: !#%%i#_if2#!
- echo,丢失: !#%%i#_if1#!)
- )
- )
- )
- )
- )
- pause
复制代码
|