【已解決】掃描局域網內MAC地址批處理掃描結果會出現重復求改進最后由 zhong365 于 -8-10 22:23

@echo off
echo MAC　IP 計算機名 >>info.txt
set rc=0
set /p ipq=請輸入內網IP的前3位（如192.168.0）：
set /p iph=請輸入你要掃描的IP起始段（IP的最后一位）：
set /p con1=請輸入你要掃描的數量：
set /a con= %iph%+%con1%
:scan
set ip=%ipq%.%iph%
ping -n 1 -w 1 %ip% >nul
title 正在檢測 %ip%
if %errorlevel% GEQ 1 goto dz
for /f tokens=1 %%i in ('nbtstat -a %ip% ^| find /i UNIQUE ^| find /i 00') do set pcname=%%i 
for /f tokens=4 %%i in ('nbtstat -a %ip% ^| find /i MAC Address') do set mac=%%i 
echo %mac% %ip% %pcname% >>info.txt
set /a iph=%iph%+1
set /a rc=%rc%+1
if %iph% GTR %con% goto end
goto scan
:dz
echo %ip%不在線，無法掃描！
set /a iph=%iph%+1
if %iph% GTR %con% goto end
goto scan
:end
title 掃描完畢
echo 　　　掃描完畢!!
@echo 共掃描%con%臺PC。其中%rc%臺PC在線!!
pause
nclick="copycode($('code0'));">復制代碼

info.txt掃描出來是這種結果MAC　IP 計算機名 00-23-7D-A7-5F-26202.202.203.1 WSDL00-23-7D-A7-5F-26202.202.203.6 WSDL00-17-31-B9-B5-9C202.202.203.10 SHB100-E0-4C-6F-1A-F0202.202.203.12 FWT1100-11-5B-53-A2-ED202.202.203.14 DBQ100-15-F2-8A-C6-27202.202.203.15 SPB100-0C-6E-72-58-B4202.202.203.16 FSB100-1B-B9-BF-7F-1E202.202.203.17 CWB1100-1B-B9-BF-7F-1E202.202.203.19 CWB1100-1B-B9-BF-7F-1E202.202.203.20 CWB11EC-A8-6B-49-58-BE202.202.203.23 CGB1EC-A8-6B-49-58-BE202.202.203.27 CGB1EC-A8-6B-49-58-BE202.202.203.30 CGB1EC-A8-6B-49-58-BE202.202.203.31 CGB1EC-A8-6B-49-58-BE202.202.203.32 CGB1EC-A8-6B-49-58-BE202.202.203.33 CGB1EC-A8-6B-49-58-BE202.202.203.34 CGB1EC-A8-6B-49-58-BE202.202.203.36 CGB1EC-A8-6B-49-58-BE202.202.203.66 CGB100-00-00-00-00-00202.202.203.100 DP2000實際上我用 nbtstat -a202.202.203.31 （這是一臺AP設備） 出來的結果是： host not found希望可以改進代碼，讓數據更加準確，不會出現這種EC-A8-6B-49-58-BE202.202.203.23 CGB1EC-A8-6B-49-58-BE202.202.203.27 CGB1EC-A8-6B-49-58-BE202.202.203.30 CGB1EC-A8-6B-49-58-BE202.202.203.31 CGB1EC-A8-6B-49-58-BE202.202.203.32 CGB1EC-A8-6B-49-58-BE202.202.203.33 CGB1EC-A8-6B-49-58-BE202.202.203.34 CGB1EC-A8-6B-49-58-BE202.202.203.36 CGB1EC-A8-6B-49-58-BE202.202.203.66 CGB1重復的現象。您要是有更好掃描局域網內MAC地址的代碼。還請多多分享