自动检测网络通断（改进版）

tanchenglong

引用了网络上的版本加以改进
1、可以指定PING的IP，或者默认PING网关（自动获取）
2、PING www.baidu.com，以验证网络连接状况
3、会用屏幕的颜色变化反映PING结果，如果是绿色表示是通的，红色表示不正常

1. @echo off
   
2. title 网络连通测试
   
3. :a
   
4. chcp 65001>nul
   
5. call :select "IPV4 Address" "ip"||call :select "IP Address" "ip"
   
6. call :select "Physical Address" "mac"
   
7. call :select "Default Gateway" "gateway"
   
8. call :select "DNS Servers" "dns"
   
9. call :select "Description" "netcard"
   
10. 
    
11. :: 演示效果
    
12. chcp 936>nul
    
13. setlocal ENABLEDELAYEDEXPANSION
    
14. echo.
    
15. echo.===============================================================
    
16. echo.
    
17. echo.            欢 迎 使 用 网 络 配 置 信 息 查 看 器
    
18. echo.
    
19. color a
    
20. echo.
    
21. echo 本机IP:%ip%
    
22. echo 本机MAC:%mac%
    
23. echo 本机DNS:%dns%
    
24. echo 网关IP:%gateway%
    
25. echo 网卡名称:%netcard%
    
26. echo.
    
27. REM PingSite表示外部网络的参考网址
    
28. REM LanIP表示本地网络的网关
    
29. REM set PingSite=www.baidu.com
    
30. set LanIP=%gateway%
    
31. set /p PingSite=请输入要检查的网址或者IP【如:%gateway%】：
    
32. if NOT DEFINED PingSite set PingSite=www.baidu.com
    
33. echo.
    
34. echo.===============================================================
    
35. echo.
    
36. echo.     即将Ping %LanIP%
    
37. echo.
    
38. REM ping %LanIP% -n 1 -l 1 >nul 2>nul
    
39. ping %LanIP% |find "TTL"
    
40. if %ERRORLEVEL% EQU 0 (
    
41.         REM echo.  ERRORLEVEL=%ERRORLEVEL%
    
42.         color 27
    
43.         echo.
    
44.         echo   哦-----本地网络可以访问
    
45.         REM ping %PingSite% -n 1 -l 1 >nul 2>nul
    
46.         echo.
    
47.         echo.
    
48.         echo.===============================================================
    
49.         echo.
    
50.         echo.     即将Ping %PingSite%
    
51.         echo.
    
52.         call :PingSiteProc
    
53.         ) else (
    
54.         color 47
    
55.         echo.
    
56.         echo 哦----本地网络倒闭
    
57.         echo 坏了-----网络彻底瘫痪了
    
58.         echo.
    
59. )
    
60. 
    
61. 
    
62. REM echo.
    
63. REM echo.===============================================================
    
64. REM echo.
    
65. REM echo.     即将Ping %PingSite%
    
66. REM echo.
    
67. REM ping %web%||echo.&&echo ◎◎◎◎◎◎◎◎◎◎◎◎◎&&color 47&&echo.&&echo      网络不通，请检查&&echo.&&echo ◎◎◎◎◎◎◎◎◎◎◎◎◎
    
68. echo.
    
69. echo.===============================================================
    
70. timeout 5 >nul
    
71. cls
    
72. goto a
    
73. REM pause>nul
    
74. REM goto :eof
    
75. 
    
76. :PingSiteProc
    
77. ping %PingSite% |find "TTL"
    
78. if %ERRORLEVEL% EQU 0 (
    
79.         color 27
    
80.         echo.
    
81.         echo   耶-----%PingSite% 可以访问
    
82.         echo   真爽-----网络畅通无阻
    
83.         REM ^G表示Ctrl+G
    
84.         REM echo ^G
    
85.         ) else (
    
86.         REM echo.  ERRORLEVEL3=%ERRORLEVEL%
    
87.         color 47
    
88.         echo   唔----%PingSite% 不能访问!
    
89.         echo   不好-----网络闭关锁国了
    
90.         echo.
    
91. )
    
92. goto :eof
    
93. 
    
94. ::**************************************************************
    
95. :: 解析ipconfig命令输出通用函数
    
96. ::**************************************************************
    
97. :select
    
98. for /f "tokens=2 delims=:" %%i in ('ipconfig /all ^| findstr /i /c:%1') do if not "!%~2!" == "" set "%~2=%%i"
    
99. goto :eof
    

复制代码

tanchenglong

1801403 发表于 2024-3-11 23:38
是不是我的姿势不对啊？DNS和网关都没获取成功啊。不管是IPV4还是IPV6，都不对啊。显示也不完全。。。直接 ...

可能系统配置中存在多网卡配置，比如虚拟网卡，这个默认只取了第1个，你用IPCONFIG /ALL看看就知道了

tanchenglong

小歌 发表于 2024-3-18 08:55
不行，网络正常 ，就一个网卡，回车 检测完居然说没有网络。

要用IPconfig /all查看，而不是物理网卡只有1个，WINDOWS系统或者部分软件会自动安装虚拟网卡，有部分的杀毒软件也会自动生成虚拟网卡实现防火墙功能