jcy0307

这个是自己闲来无事的时候做的，还未完成。不过满足你的需求足够了！

@echo off
title 查看局域网在线计算机  ****jcy0307****
color 0a
setlocal EnableDelayedExpansion
if exist ip.txt del ip.txt
set a=1
:start
cls
echo.
echo 正在测试--192.168.0.%a%
ping 192.168.0.%a% -w 1 -n 1 | find /i "Lost = 1" && set c=1||set c=0
if !c!==0 (echo 192.168.0.%a% >>IP.txt)
set /a a=%a%+1
if "%a%"=="255" goto ip
goto start
:ip
cls
echo.
set b=0
for /f "delims= " %%i in (ip.txt) do (
set /a b=!b!+1
echo %%i>nul
)
echo                               当前在线计算机
echo ===============================================================================
echo.
echo        计算机名          IP           状  态            开放端口      
echo.
for /f "delims= " %%j in (ip.txt) do (
echo                      %%j       在线     
)
echo ===============================================================================
echo                                               当前有!b!台计算机在线         
pause>nul
exit
复制代码

jcy0307

主动给已获解决的求助帖标题加注[已解决]字样的，将会得到管理层的加分奖励。
记得加上哦