[网络连接] 批处理批量PING IP

330428725

读取1.txt里的所有IP，然后ping1.txt里的IP把可以PING通的保存到2.TXT

huajinghua

@echo off
color 1f
title MADE by 公孙轩辕
setlocal EnableDelayedExpansion
for /f "tokens=*" %%i in (1txt) do (
set wang=%%i
echo 正在ping %%i
ping /n 5 !wang! >tmp.txt
if "!errorlevel!"=="1" call :fail
if "!errorlevel!"=="0" echo ping %%i 成功 & call :suc)
echo\&echo\
echo 全部ping完成！按任意键继续……
del tmp.txt
pause
exit
:suc
for /f "tokens=4 delims= " %%i in ('find "statistics" tmp.txt') do (
set k=%%i
set wang2=!k:~0,-2!
echo !wang2! >>2.txt)
goto :eof
:fail
echo ping !wang! 失败
goto :eof

随风

@echo off
setlocal EnableDelayedExpansion
for /f "delims=" %%a in (1.txt) do (
  ping/n 1 %%a
  if !errorlevel! equ 0 >>2.txt echo %%a
)
pause 
复制代码

huajinghua

够简洁！不过提示信息太少了

huajinghua

不好意思。我上面的是Ping网址，刚帮别人写的，所以要从网址获取IP
还有，3楼ping一次完全没考虑丢包，其实还可以更简单。利用&&符号！
@echo off
setlocal EnableDelayedExpansion
for /f "delims=" %%a in (1.txt) do (ping/n 3 %%a && echo %%a >>2.txt)
pause