设为首页收藏本站
切换到宽版

 找回密码
 注册
搜索
批处理之家»论坛 › 批处理专区: BAT CMD DOS › BAT求助&讨论 › 求助批处理自动检测DNS并设定最佳DNS的代码 这段代码出 ...
[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发新帖
查看: 18641|回复: 4

[网络连接] 求助批处理自动检测DNS并设定最佳DNS的代码 这段代码出现问题

[复制链接]
22123
发表于 2022-11-11 06:12:47 | 显示全部楼层 |阅读模式
新人小白求助各位大大  本人之前求助 得到论坛@Echo11大大的一段 自动检测DNS并设定最佳DNS的代码,目前遇到个问题
就是这段代码执行后,除了第一个ip显示正常,接下去的几个ip检测都会失败,显示全部丢失.最终只会添加第一个正常的ip到dns中.
好像是这句【IF not %errorlevel%==0 ECHO.%~1 全部丢失！&GOTO:EOF】有问题?还是怎么回事 哪位大大能帮助下 改正确?谢谢了
还有CALL: pingDNS 8.8.8.88是我做ping不通测试的ip 貌似这个ip ping不通不会显示 全部丢失！要放第一个位置 还会自动被加入到主DNS 相当于ping不通的ip会加入到dns里

我希望是比如有6个ip 各ping 4次 只要有ip的ping包 丢失大于1次就不把 这个ip 写入到dns .但其他ip正确能4次都ping通的,不丢包的ip按照ms最快的排序 依次加入到 "WLAN"中,而不是有一个ip错误就全都放弃


代码如下↓ 求助大大们能帮我修正下这个问题 谢谢
  1. @ECHO off
  2. ECHO.提示：netsh 需要管理员权限，请以管理员权限运行本脚本.
  3. setlocal EnableDelayedExpansion
  4. SET "IP1="
  5. SET "IP2="
  6. SET "IP3="
  7. ECHO.请稍等...&ECHO.
  8. CALL :PingDNS 223.5.5.5
  9. CALL :PingDNS 114.114.114.114
  10. CALL :PingDNS 180.76.76.76
  11. CALL :PingDNS 119.29.29.29
  12. CALL :PingDNS 8.8.8.8
  13. ECHO.执行以下命令：
  14. IF defined IP1 netsh int ip add dns "WLAN" %IP1% index=1
  15. IF defined IP2 netsh int ip add dns "WLAN" %IP2% index=2
  16. IF defined IP3 netsh int ip add dns "WLAN" %IP3% index=3
  17. pause
  18. GOTO:EOF

  20. :PingDNS <dnsIP>
  21. for /f "tokens=1-9 delims==m " %%a in ('ping -n 4 %~1 ^| find "平均"') do ECHO.%~1 的平均时间:%%fms&SET %~1_time=%%f
  22. REM 对于4次全部丢失的，不显示平均时间，故直接丢弃
  23. IF not %errorlevel%==0 ECHO.%~1 全部丢失！&GOTO:EOF
  24. CALL :CMP %~1
  25. GOTO:EOF

  27. :CMP <IP>
  28. IF not defined IP1 SET "IP1=%~1"&EXIT /B 1
  29. IF not defined IP2 SET "IP2=%~1"&EXIT /B 2
  30. IF not defined IP3 SET "IP3=%~1"&EXIT /B 3
  31. IF !%~1_time! LSS !%IP1%_time! SET "IP3=%IP2%"&SET "IP2=%IP1%"&SET "IP1=%~1"&EXIT /B 1
  32. IF !%~1_time! LSS !%IP2%_time! SET "IP3=%IP2%"&SET "IP2=%~1"&EXIT /B 2
  33. IF !%~1_time! LSS !%IP3%_time! SET "IP3=%~1"&EXIT /B 3
  34. EXIT /B 0
复制代码
回复

举报

BAT221110
发表于 2022-11-11 07:08:15 | 显示全部楼层
本帖最后由 BAT221110 于 2022-11-11 07:09 编辑

只需在PingDNS下重置ERRORLEVEL即可。
修改后的代码：

  2. @ECHO off
  3. ECHO.提示：netsh 需要管理员权限，请以管理员权限运行本脚本.
  4. setlocal EnableDelayedExpansion
  5. SET "IP1="
  6. SET "IP2="
  7. SET "IP3="
  8. ECHO.请稍等...&ECHO.
  9. CALL :PingDNS 223.5.5.5
  10. CALL :PingDNS 114.114.114.114
  11. CALL :PingDNS 180.76.76.76
  12. CALL :PingDNS 119.29.29.29
  13. CALL :PingDNS 8.8.8.8
  14. ECHO.执行以下命令：
  15. IF defined IP1 echo netsh int ip add dns "WLAN" %IP1% index=1
  16. IF defined IP2 echo netsh int ip add dns "WLAN" %IP2% index=2
  17. IF defined IP3 echo netsh int ip add dns "WLAN" %IP3% index=3
  18. pause
  19. GOTO:EOF

  21. :PingDNS <dnsIP>
  22. set "errorlevel=0"
  23. for /f "tokens=1-9 delims==m " %%a in ('ping -n 4 %~1 ^| find "平均"') do ECHO.%~1 的平均时间:%%fms & SET %~1_time=%%f
  24. REM 对于4次全部丢失的，不显示平均时间，故直接丢弃
  25. IF not %errorlevel%==0 ECHO. %~1 全部丢失！&GOTO:EOF
  26. CALL :CMP %~1
  27. GOTO:EOF

  29. :CMP <IP>
  30. IF not defined IP1 SET "IP1=%~1" & EXIT /B 1
  31. IF not defined IP2 SET "IP2=%~1" & EXIT /B 2
  32. IF not defined IP3 SET "IP3=%~1" & EXIT /B 3
  33. IF !%~1_time! LSS !%IP1%_time! SET "IP3=%IP2%"&SET "IP2=%IP1%"&SET "IP1=%~1"&EXIT /B 1
  34. IF !%~1_time! LSS !%IP2%_time! SET "IP3=%IP2%"&SET "IP2=%~1"&EXIT /B 2
  35. IF !%~1_time! LSS !%IP3%_time! SET "IP3=%~1"&EXIT /B 3
  36. EXIT /B 0
复制代码
效果：
  1. 提示：netsh 需要管理员权限，请以管理员权限运行本脚本.
  2. 请稍等...

  4. 223.5.5.5 的平均时间:18ms
  5. 114.114.114.114 的平均时间:41ms
  6. 180.76.76.76 的平均时间:15ms
  7. 119.29.29.29 的平均时间:15ms
  8. 8.8.8.8 的平均时间:34ms
  9. 执行以下命令：
  10. netsh int ip add dns "WLAN" 119.29.29.29 index=1
  11. netsh int ip add dns "WLAN" 223.5.5.5 index=2
  12. netsh int ip add dns "WLAN" 8.8.8.8 index=3
  13. 请按任意键继续. . .
复制代码
有可能是后面EXIT的时候把ERRORLEVEL搞乱了。
回复

举报

22123
 楼主| 发表于 2022-11-11 08:35:40 | 显示全部楼层
本帖最后由 22123 于 2022-11-11 14:01 编辑

谢谢大大 貌似还是有点问题
ping不通的ip 不会过滤掉 而且会以默认速度最高加到首选dns里
回复

举报

22123
 楼主| 发表于 2022-11-11 10:01:39 | 显示全部楼层
只需在PingDNS下重置ERRORLEVEL即可。
修改后的代码：效果：有可能是后面EXIT的时候把ERRORLEVEL搞乱了。
BAT221110 发表于 2022-11-11 07:08



    @BAT221110大大您好,我使用您修改后的脚本 可以正常ping所有ip了, 但还有个问题出现 我附上代码 您帮我再看看
我的问题是:我用2个错误的ip放在ping地址里  一个是ping不通 显示请求超时的ip 8.8.8.88 和地址不存在的 08.8.8.8 来做测试,
结果就是虽然ping不通的8.8.8.88 会当做速度最快的ip 放入到DNS里,而不是丢弃不写入到IP1里.  另一个08.8.8.8也差不多,会显示配置的DNS服务器不正确或不存在, 但会添加到DNS里,因添加错误而留白.   
这个问题该如何修正 ?   谢谢!!!
------------------------------------------------------------
□■自动检测DNS速度并设定最佳DNS
正在检测DNS...

阿里:   223.5.5.5       腾讯:   119.29.29.29    114:    114.114.114.114         百度:   180.76.76.76
360:    101.226.4.6     谷歌:   8.8.8.8         Cloudflare:     1.1.1.1

223.5.5.5       的平均时间:5ms
119.29.29.29    的平均时间:10ms
114.114.114.114 的平均时间:14ms
180.76.76.76    的平均时间:12ms
101.226.4.6     的平均时间:13ms
1.1.1.1 的平均时间:200ms
8.8.8.8 的平均时间:70ms
正在设定最佳DNS...
参数错误。
配置的 DNS 服务器不正确或不存在。
   IPv4 地址 . . . . . . . . . . . . : 192.168.0.91(首选)
   子网掩码  . . . . . . . . . . . . : 255.255.255.0
   默认网关. . . . . . . . . . . . . : 192.168.0.1
   DHCP 服务器 . . . . . . . . . . . : 192.168.0.1
   DNS 服务器  . . . . . . . . . . . : 8.8.8.88
                                             223.5.5.5
                                               ↑ 本机目前DNS
----------------------------------------------------------
请按任意键继续. . .
  1. @ECHO off
  2. ECHO □■自动检测DNS速度并设定最佳DNS

  4. REM 获取联网设备名称并重置DNS服务器地址为自动获取(防止之后DNS写入出错)
  5. for /f tokens^=2^ delims^=^" %%i in ('netsh interface ip show address') do (set "macname=%%i"
  6. goto:Next)
  7. :Next
  8. REM %macname%
  9. netsh int ip set dns %macname% dhcp >nul
  10. REM 获取网关(网关可作为首选或备用DNS)
  11. for /f "tokens=15" %%i in ('ipconfig /all ^| find /i "默认网关" ^| find /i "192"') do set gateway=%%i
  12. REM %gateway%
  13. setlocal EnableDelayedExpansion
  14. SET "IP1="
  15. SET "IP2="
  16. SET "IP3="
  17. ECHO.正在检测DNS...&ECHO.
  18. echo 阿里:        223.5.5.5        腾讯:        119.29.29.29        114:        114.114.114.114                百度:        180.76.76.76
  19. echo 360:        101.226.4.6        谷歌:        8.8.8.8                Cloudflare:        1.1.1.1
  20. echo.
  21. CALL :PingDNS 1.1.1.1
  22. CALL :PingDNS 8.8.8.8
  23. CALL :PingDNS 223.5.5.5
  24. CALL :PingDNS 119.29.29.29
  25. CALL :PingDNS 114.114.114.114
  26. CALL :PingDNS 180.76.76.76
  27. CALL :PingDNS 101.226.4.6
  28. CALL :PingDNS 8.8.8.88
  29. rem CALL :PingDNS %gateway%
  30. ECHO.正在设定最佳DNS...
  31. IF defined IP1 netsh int ip add dns %macname% %IP1% index=1
  32. IF defined IP2 netsh int ip add dns %macname% %IP2% index=2
  33. IF defined IP3 netsh int ip add dns %macname% %IP3% index=3 &goto:继续2●
  34. pause
  35. GOTO:EOF

  37. :PingDNS <dnsIP>
  38. set "errorlevel=0"
  39. for /f "tokens=1-9 delims==m " %%a in ('ping -n 4 %~1 ^| find "平均"') do ECHO.%~1        的平均时间:%%fms & SET %~1_time=%%f
  40. REM 对于4次全部丢失的，不显示平均时间，故直接丢弃
  41. IF not %errorlevel%==0 ECHO. %~1 全部丢失！&GOTO:EOF
  42. CALL :CMP %~1
  43. GOTO:EOF

  45. :CMP <IP>
  46. IF not defined IP1 SET "IP1=%~1" & EXIT /B 1
  47. IF not defined IP2 SET "IP2=%~1" & EXIT /B 2
  48. IF not defined IP3 SET "IP3=%~1" & EXIT /B 3
  49. IF !%~1_time! LSS !%IP1%_time! SET "IP3=%IP2%"&SET "IP2=%IP1%"&SET "IP1=%~1"&EXIT /B 1
  50. IF !%~1_time! LSS !%IP2%_time! SET "IP3=%IP2%"&SET "IP2=%~1"&EXIT /B 2
  51. IF !%~1_time! LSS !%IP3%_time! SET "IP3=%~1"&EXIT /B 3
  52. EXIT /B 0

  54. :继续2●
  55. ipconfig /all|findstr "[0-9]*\.[0-9]*\."
  56. echo                                         ↑ 本机目前DNS
  57. echo ----------------------------------------------------------
  58. REM 自动检测DNS速度并设定最佳DNS结束.↓下面可以放其他脚本继续执行......
  59. pause
复制代码
回复

举报

BAT221110
发表于 2022-11-11 18:57:12 | 显示全部楼层
回复 4# 22123


    我研究了一下，如果IP PING不通的话，
  1. ping -n 4 %~1 ^| find "平均"
复制代码
会返回1，这个正常。但是在for后面，就变成返回0了。

我怀疑这是因为for修改了返回值。

所以，代码需要做整体的修改。建议新开一贴，看看高手们的意见。
回复

举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|批处理之家 ( 渝ICP备10000708号 )

GMT+8, 2026-3-19 14:12 , Processed in 0.022993 second(s), 8 queries , File On.

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

快速回复 返回顶部 返回列表