COLOR 0A
CLS
@ECHOOff
Title查询局域网内在线电脑IP
:send
@ECHO off&setlocal enabledelayedexpansion
ECHO 正在获取本机的IP地址，请稍等...
for/f "tokens=3 skip=2 delims=: "%%i in(\'nbtstat -n\')do(
set"IP=%%i"
set IP=!IP:~1,-1!
ECHO 本机IP为：!IP!
goto:next
)
:next
for/f "delims=. tokens=1,2,3,4"%%i in("%IP%")doset range=%%i.%%j.%%k
ECHO.&ECHO 正在获取本网段内的其它在线计算机名，请稍等...
ECHO 本网段【%range%.*】内的计算机有：
for/f "delims="%%i in(\'net view\')do(
set"var=%%i"
::查询在线计算机名称
if"!var:~0,2!"=="\\"(
set"var=!var:~2!"
ECHO !var!
ping -n 1!var!>nul
))
ECHO.
ECHO 正在获取本网段内的其它在线计算机IP，请稍等...
for/f "skip=3 tokens=1,* delims= "%%i in(\'arp -a\')do ECHO IP：%%i 正在使用
ECHO.
ECHO 查询完毕，按任意键退出...
pause>nul
//该代码片段来自于: http://www.sharejs.com/codes/shell/5917

 

 

版权声明：本文为huangtailang原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://www.cnblogs.com/huangtailang/p/4369611.html