将以下内容复制到记事本,另存为后缀为.bat的批处理文件:
COLOR 0A
CLS
@ECHO Off
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%) do set 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 查询完毕,按任意键退出...
pausenul
保存为bat格式,双击运行试试。复制的不一定有用
取消
评论