for /f %%i in (a.txt) do (ping /n 1 %%i&&echo,%%i>>b.txt)
复制代码

@echo off&setlocal enabledelayedexpansion
for /f %%a in (a.txt) do (
  for /f "tokens=5 delims==m" %%b in ('ping /n 1 %%a^|findstr "from"') do (
    if not defined min (
      set /a min=%%b
      ) else (
      if !min! gtr %%b set /a min=%%b&set "_!min!=%%a"
    )
  )
)
echo 经检测最适宜的dns为:!_%min%!
pause>nul
复制代码

@echo off&setlocal enabledelayedexpansion>nul 2>nul 3>nul 4>nul
set /a 并行=32,等待=1000
echo %time% >con
for /f "delims=" %%a in (a.txt) do (
    del /f "%temp%\*.$p"
    set /a "n+=1","num+=1">"%temp%\%%a.$p"
    title !num!: %%a
    if !n! geq %并行% (
         set n=0
         for %%b in ("%temp%\*.$p") do set /a n+=1
         if !n! gtr 0 cmd /c exit
    )
    start /b cmd /c "ping>"%temp%\%%a.$p" /n 1 /w %等待% %%a&&echo>>b.txt %%a"
)
echo 全部ping完
echo %time% >con
pause&exit
复制代码

@echo off
(for /f %%i in (a.txt) do ping %%i /n 1 && echo %%i)>b.txt
start b.txt 
复制代码