怎麼查詢區域網路内全部電腦IP和mac位址等資訊?

下面程式用記事本寫下，報字尾名.txt改成.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 查詢完畢，按ctrl+c鍵退出...

pause>nul