落絮飞雁的个人网站

顺流而下,把梦做完

查看局域网内设备

话不多说,直接上代码。从网上找的,稍微改了几个地方。

 

COLOR 0A
CLS
@ECHO Off
Title 查询局域网内在线电脑IP
:send
@ECHO off&setlocal enabledelayedexpansion
ECHO 正在获取本机的IP地址,请稍等...
ECHO 操作时间:%date%%time%>>out.log
for /f "tokens=3 skip=2 delims=: " %%i in ('nbtstat -n') do (
set "IP=%%i" >>out.log
set IP=!IP:~1,-1!
ECHO 本机IP为:%IP% >>out.log
goto :next
)
:next
for /f "delims=. tokens=1,2,3,4" %%i in ("%IP%") do set range=%%i.%%j.%%k >>out.log
ECHO.&ECHO 正在获取本网段内的其它在线计算机名,请稍等...
ECHO 本网段【%range%.*】内的计算机有: >>out.log
for /f "delims=" %%i in ('net view') do (
set "var=%%i"
::查询在线计算机名称
if "!var:~0,2!"=="\" (
set "var=!var:~2!" >>out.log
ECHO !var! >>out.log
ping -n 1 !var!>nul
))
ECHO.>>out.log
ECHO 正在获取本网段内的其它在线计算机IP,请稍等... >>out.log
for /f "skip=3 tokens=1,* delims= " %%i in ('arp -a') do ECHO IP: %%i >>out.log
ECHO ============================================>>out.log
ECHO 查询完毕


原文标题:查看局域网内设备|落絮飞雁的个人网站
原文链接:https://www.luoxufeiyan.com/2014/07/28/%e6%9f%a5%e7%9c%8b%e5%b1%80%e5%9f%9f%e7%bd%91%e5%86%85%e8%ae%be%e5%a4%87/
授权协议:创作共用 署名-非商业性使用 2.5 中国大陆
除注明外,本站文章均为原创;转载时请保留上述链接。