发布网友 发布时间:2022-04-23 19:51
共1个回答
热心网友 时间:2023-10-06 03:35
@echo off & title Ping 检测IP连接 By 依梦琴瑶
cd /d %~dp0
setlocal enabledelayedexpansion
::设置包含IP列表的文件
set List=需检测的IP.txt
::设置结果文件名
set result=Ping结果.txt
if not exist "%List%" (
echo %List% 不存在
pause&exit
)
if exist "%result%" del "%result%"
echo 即将开始 Ping 检测。&ping 0 -n "2">nul
for /f "delims=" %%a in (%List%) do call:PingIt %%a
del P$&cls&title Ping 检测完毕 By 依梦琴瑶&echo 检测完毕,已生成检测日志,按任意键后将为您打开日志记录文件。
pause>nul&start "" "%result%"&exit
:PingIt
set msg=正在对“%1”进行 Ping 检测。。。
cls&title %msg%&echo %msg%
ping %1 -n "1">P$
set "ms="
findstr /c:"TTL=" P$>nul && for /f "tokens=4 delims== " %%a in ('findstr /c:"平均" P$') do set ms=%%a
if defined ms (
set rst=!ms:~,-2! 毫秒
) else (
set rst=连接超时(不通)
)
echo %~1 : %rst%>>"%result%"
goto :eof
曾经给人写了一个类似的,现在根据您的要求稍微修整一下。
追问怎样添加包含ip的txt文本啊追答新建一个txt文本,名字就和脚本中的一样即可,然后里面一行一个ip地址。