[网络连接] [已解决]用bat能否判断当前有线网卡（xp系统，单网卡）是否联网？

@echo off
(echo @echo off
echo ping /n 1 /l 0 /w 300000 99.99
echo :ok
echo ping /n 1 /l 0 /w 60000 99.99 ^>nul
echo ping /n 1 /l 0 /w 0 www.baidu.com ^>nul^&^&goto :qq^|^|goto :ok
echo :qq
echo ping /n 1 /l 0 /w 60000 99.99 ^>nul
echo start "" "C:\Program Files\Tencent\QQ\Bin\QQ.exe")>"C:\Documents and Settings\All Users\「开始」菜单\程序\启动\启动.bat"
复制代码

@echo off
if exist run.vbs del run.vbs & goto :mybat
echo CreateObject("WScript.Shell").Run """%cd%\%~n0.bat""",0 >run.vbs &start run.vbs&exit
:mybat
rem 下边开始写批处代码了(适合全自动后台隐藏运行场合)

ping /n 1 /l 0 /w 300000 99.99

:ok
ping /n 1 /l 0 /w 60000 99.99 ^>nul
ping /n 1 /l 0 /w 0 www.baidu.com ^>nul^&^&goto :qq^|^|goto :ok

:qq
ping /n 1 /l 0 /w 60000 99.99 ^>nul
start "" "C:\Program Files\Tencent\QQ\Bin\QQ.exe"


exit


@echo off
if "%1" == "h" goto begin
mshta vbscript:createobject("wscript.shell").run("%~fs0 h",0)(window.close)&&exit
:begin
rem 下边开始写批处代码了(适合全自动场合)
复制代码

ping 127.0.0.1 -n 300 >nul 2>nul

:label
ping 127.0.0.1 -n 60 >nul 2>nul
ping  www.baidu.com 
echo %errorlevel%
if %errorlevel% equ 1 goto:label
if %errorlevel% equ 0 goto:laben

:laben
ping 127.0.0.1 -n 60 >nul 2>nul
start "" "C:\Program Files\Tencent\QQ\Bin\QQ.exe"

exit
复制代码

:qqmon
ping 127.0.0.1 -n 60 >nul 2>nul
ping  www.baidu.com 
echo %errorlevel%
if %errorlevel% equ 1 goto:qqmon
if %errorlevel% equ 0 goto:qqrun

:qqrun
taskkill /IM qq.exe /F
ping 127.0.0.1 -n 60 >nul 2>nul
start "" "C:\Program Files\Tencent\QQ\Bin\QQ.exe"
复制代码