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

[网络连接] [分享]批处理版adsl自动连接(送给adsl总掉线的朋友)

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

学习中。谢谢老大的分享
我来学习中

TOP

返回列表