[分享]多种方法局域网查询IP.MAC的批处理

mxxcgzxxx

前一部分按工作组查询方法是老贴中有的，但部分电脑会无法显示出来。
所以增补了按网卡所在IP进行查找和自定义跨子网查找的方法。
有了MAC地址就可以很方便的配合软件进行远程关机、开机和其他操作。
希望能对新手有所帮助，老鸟就飞过去吧呵

1. 
   
2. @echo        off
   
3. cls
   
4. for /l %%1 in (1,1,3) do echo.
   
5. echo.              特别提示
   
6. echo.
   
7. echo.   本软件将会把网内同一域的计算机分布情况显示出来,
   
8. echo.   并将信息保存于桌面"网内IP分布情况.txt"文档内,以便查询！
   
9. echo.
   
10. echo.   如果无法找到相关信息有以下几种可能：
    
11. echo.   1、您的计算机没有设置网关等信息无法进行局域网络共享！
    
12. echo.   2、您所要查找的计算机未开机或未进入WINDOWS系统！
    
13. echo.   3、您所要查找的计算机与您的计算机不在一个网域下！
    
14. echo.   4、您的计算机未接入网络，请查看网络连接情况！
    
15. for /l %%1 in (1,1,3) do echo.
    
16. pause
    
17. 
    
18. setlocal ENABLEDELAYEDEXPANSION
    
19. 
    
20. ::文档存放位置在这修改
    
21. set "wd=D:\网内IP分布情况.txt"
    
22. 
    
23. echo.   网络在线IP及计算机名分布情况>%wd%
    
24. :x
    
25. cls
    
26. set /p p=^
    
27. 
    
28. ^
    
29. 
    
30.         [1]        按工作组查询网络^
    
31. 
    
32. ^
    
33. 
    
34.         [2]        按IP网段查询网络^
    
35. 
    
36. ^
    
37. 
    
38.         [3]        自定义IP网段查询^
    
39. 
    
40. ^
    
41. 
    
42.         请选择：
    
43. if %p%==1 goto :1
    
44. if %p%==2 goto :2
    
45. if %p%==3 goto :3
    
46. goto :x
    
47. :1
    
48. cls
    
49. FOR /F "delims=, " %%a IN ('net view /domain ^|find "命令執行成功" /v ^|find "The command completed successfully." /v ^|find "命令成功完成" /v ^|find "--" /v ^|find "Domain" /v ^|find "" /v ^|find "コマンドは正常に終了しました" /v /i') do (
    
50.         echo.>>%wd%
    
51.         echo.=======工作组:%%a========>>%wd%
    
52.         echo.   IP地址                MAC地址                计算机名>>%wd%
    
53.         echo.>>%wd%
    
54.         echo.=======工作组:%%a========
    
55.         echo.   IP地址                MAC地址                计算机名
    
56.         FOR /F "eol=; delims=, " %%a in ('net view /domain:%%a ^|findstr "\"')        DO (
    
57.                 FOR /F "eol=; tokens=1,2,3* delims=\" %%1 in ('echo %%a') do (
    
58.                         set "m="
    
59.                         set "ip="
    
60.                         set "id="
    
61.                         FOR /F "tokens=1,2,3,4*        delims=:[] " %%a IN ('ping -a -n 1 -w 100 %%1 ^|findstr "Pinging"') do (
    
62.                                 set "m=%%b"
    
63.                                 set "ip=%%c"
    
64.                                 set "mac="
    
65.                                 for /f "tokens=1,2,3 delims==         " %%a in ('nbtstat -a !ip!') do if "%%a"=="MAC" set id=%%c
    
66.                                 call :11 !ip! !id! !m!
    
67.                                 )
    
68.                         )
    
69.                 )
    
70.         )
    
71. pause
    
72. goto :eof
    
73. :11
    
74. echo.%1        %2        %3>>%wd%
    
75. echo.%1        %2        %3
    
76. goto :eof
    
77. 
    
78. :2
    
79. cls
    
80. echo.查询网络连接情况中请稍候……
    
81. set n=1
    
82. for /f "tokens=1,2,3,4,5 delims=:.=[]         " %%1 in ('nbtstat -a 0') do (
    
83.         if "%%1"=="本地连接" set lj!n!=%%1
    
84.         if "%%1"=="无线网络连接" set lj!n!=%%1
    
85.         if "%%1"=="Node" set "ip!n!=%%3.%%4.%%5." & set /a n+=1
    
86.         )
    
87. echo.
    
88. set /a n-=1
    
89. for /l %%a in (1,1,%n%) do echo.        [%%a]        !lj%%a!        !ip%%a!
    
90. echo.
    
91. set "p="
    
92. set /p p=        请选择您需要查询的IP段：
    
93. set "ipd=!ip%p%!"
    
94. goto :4
    
95. :3
    
96. set "ipd="
    
97. set /p ipd=输入您要查询的IP段（xxx.xxx.xxx.）:
    
98. :4
    
99. set /a n=1,end=254
    
100. echo.
     
101. set /p n=        您需要查询的起始IP为%ipd%
     
102. echo.
     
103. set /p end=        您需要查询的终止IP为%ipd%
     
104. echo.
     
105. echo.=======IP%ipd%段========>>%wd%
     
106. echo.   IP地址                MAC地址                计算机名        工作组>>%wd%
     
107. echo.>>%wd%
     
108. echo.   IP地址                MAC地址                计算机名        工作组
     
109. :5
     
110. set "ip=%ipd%%n%"
     
111. set "m="
     
112. set "id="
     
113. set "g="
     
114. for /f %%a in ('ping -n 1 %ip% ^|findstr "Reply"') do (
     
115.         for /f "tokens=1,2,3 delims==         " %%1 in ('nbtstat -a !ip!') do (
     
116.                 if "%%1"=="MAC" set "id=%%3"
     
117.                 if "%%2"=="<00>" if "%%3"=="UNIQUE" set "m=%%1"
     
118.                 if "%%2"=="<00>" if "%%3"=="GROUP" set "g=%%1"
     
119.                 )
     
120.         )
     
121. echo.%ip%        %id%        %m%        %g%>>%wd%
     
122. echo.%ip%        %id%        %m%        %g%
     
123. echo.
     
124. set /a n+=1
     
125. if %n% gtr %end% echo.查询情况已被保存在"%wd%"中 & pause &goto :eof
     
126. goto :5
     
127. 
     

复制代码