本程序是自身隐藏运行的,你可以加入系统启动项,也可以放在桌面上点击,使用前请将代码中的连接名、adsl帐号、密码改为自己实际的值,代码如下:- @echo off
- if "%1" == "h" goto begin
- mshta vbscript:createobject("wscript.shell").run("%~nx0 h",0)(window.close)&&exit
- :begin
- if not defined flag rasdial 连接名 adsl帐号 密码&set "flag=a"
- for /f "tokens=7 delims== " %%a in ('ping www.baidu.com^|findstr /i lost') do set "str=%%a"
- if %str% geq 2 (
- rasdial /disconnect>nul
- rasdial 连接名 adsl帐号 密码
- )
- goto begin
复制代码
|