[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[网络连接] [分享]无线热点客户端查看批处理程序

win7的无线热点(承载网络)相信大家并不陌生,利用无线热点,可以将多个无线客户端连接到一起,组建小型的无线局域网。同时还能共享计算机上的宽带连接,从而将多个设备接入互联网。
    这个批处理程序的功能就是查看连接到无线热点上的客户端信息,包括IP、物理地址。
    欢迎大家使用和提出建议!
    (已在win7下测试过,win8应该也能用,但尚未测试)
  1. @echo off & setlocal EnableDelayedExpansion & color 1F & title 无线热点客户端查看程序
  2. (rem 无线热点客户端查看程序
  3. rem 版本 0.4 Beta
  4. set "ismode=" &rem 无线热点模式是否启用
  5. set "isstart=" &rem 无线热点状态是否开启
  6. set "isap=" &rem 是否找到ap信息
  7. set "apssid=" &rem 无线热点的ssid
  8. set "apmac=" &rem 无线热点的物理地址
  9. set "apip=" &rem 无线热点的IP地址
  10. set "sumclient=" &rem 连接到无线热点的客户端总数
  11. set "clientip=" &rem 客户端ip
  12. set "clientmac=" &rem 客户端mac
  13. set "clientstate=" &rem 客户端验证状态
  14. set "ipclass=" &rem 客户端ip类型
  15. set "n=" &rem 临时变量
  16. )
  17. :Begin
  18. echo 无线热点信息:
  19. for /f "skip=3 tokens=1* usebackq delims=:" %%i in (`netsh wlan show hostednetwork`) do (
  20.   set /a n+=1
  21.   if "!n!"=="1" (
  22.     if "%%j"==" 已启用" (set "ismode=true") else set "ismode=false"
  23.     if "%%j"=="" (echo   无线热点模式:不可用) else echo   无线热点模式:%%j
  24.   )
  25.   if "!n!"=="2" (
  26.     if /i "!ismode!"=="true" (
  27.       set "apssid=%%j"
  28.       echo   无线热点的SSID:!apssid!
  29.     ) else echo   未启动无线热点,SSID不可用
  30.   )
  31.   if "!n!"=="8" (
  32.     if "%%j"==" 已启动" (set "isstart=true") else (set "isstart=false")
  33.     if "%%j"=="" (echo   无线热点状态:不可用) else echo   无线热点状态:%%j
  34.   )
  35.   if "!n!"=="9" (
  36.     set "apmac=%%j"
  37.     set "apmac=!apmac::=-!" &rem 将:转换为-
  38.     echo   无线热点的物理地址:!apmac!
  39.   )
  40.   if "!n!"=="12" set "sumclient=%%j" &rem 连接到无线热点的客户端总数
  41. )
  42. if /i "!isstart!"=="true" (
  43.   for /f "tokens=1* usebackq delims=:" %%i in (`ipconfig /all`) do (
  44.     if /i "%%j"==" !apmac!" set "isap=true" &rem 已进入ap信息
  45.     if /i "!isap!"=="true" (
  46.       set "n=%%i"
  47.       if /i "!n:~0,7!"=="   IPv4" (
  48.         set "apip=%%j"  rem 获取无线热点的IP地址
  49.         set "isap=false" &rem 已离开ap信息
  50.       )
  51.     )
  52.   )
  53.   for /f "delims=(" %%i in ("!apip!") do set "apip=%%i" &rem 分离出ip地址
  54.   echo   无线热点的IP地址:!apip!
  55.   echo - - - - - -&echo;
  56.   echo 连接到无线热点上的客户端信息:
  57.   if !sumclient! gtr 0 (
  58.     echo   连接到无线热点的客户端总数:!sumclient!
  59.     echo   序号 类型 验证状态 物理地址            IP地址
  60.     set "n=1"
  61.     for /f "skip=16 tokens=1,2 usebackq delims= " %%i in (`netsh wlan show hostednetwork`) do (
  62.       set "clientmac=%%i"
  63.       set "clientmac=!clientmac::=-!" &rem 将:转换为-
  64.       set "clientstate=%%j"
  65.       for /f "tokens=1,3 usebackq delims= " %%i in (`arp -a -n !apip! ^| find /i "!clientmac!"`) do (
  66.         set "clientip=%%i"
  67.         set "ipclass=%%j"
  68.       )
  69.       echo   !n! !ipclass! !clientstate! !clientmac!   !clientip!
  70.       set /a n+=1
  71.     )
  72.   ) else echo   当前没有客户端连接到无线热点上
  73. )else echo   未启动无线热点,IP和物理地址不可用 & echo   未启动无线热点,客户端信息不可用
  74. echo - - - - - -
  75. :End
  76. pause
复制代码
1

评分人数

图挂了
百度用户内部交流

TOP

不过的应用,支持

TOP

回复 2# BAT-VBS


    补图:

第一次在这发帖,有些地方没注意到。

TOP

回复 4# DeepBlueTears


    帮你放到顶楼了
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

本帖最后由 DeepBlueTears 于 2012-11-26 12:38 编辑

回复 5# Batcher


    谢谢,还不太了解这里的功能,麻烦了。

TOP

返回列表