注册 登录  
 加关注
   显示下一条  |  关闭
温馨提示!由于新浪微博认证机制调整,您的新浪微博帐号绑定已过期,请重新绑定!立即重新绑定新浪微博》  |  关闭

c.pass 的博客

众里寻他千百度,蓦然回首,那人却在,灯火阑珊处。

 
 
 

日志

 
 

快速创建拨号连接  

2010-01-22 14:13:24|  分类: 默认分类 |  标签: |举报 |字号 订阅

  下载LOFTER 我的照片书  |

XP系统下,快速创建拨号连接:

只要把下面的内容保存为bat文件,双击bat文件,按提示操作即可快速创建。

注:Vista,win7系统上没试过!!!!!!

@echo off
MODE con COLS=55 LINES=20
title 快带连接--陈兵 QQ:286569692
:adsl
cls
echo/
echo/
echo.                 ╭─────────╮
echo.         ╭───┤   选择如下操作   ├───╮
echo.         │      ╰─────────╯      │
echo.         │                                  │
echo.         │       A.创建ADSL宽带连接         │
echo.         │                                  │
echo.         │       B.ADSL宽带连接自动拨号     │
echo.         │                                  │
echo.         │       C.断开 ADSL 宽带连接       │
echo.         │                                  │
echo.         │          Y.返回菜单              │
echo.         │                                  │
echo.         ╰─────────────────╯
echo.
set /p enter=            请你输入你的选择:
if not "%enter%"=="" set enter=%enter:~0,1%
if /i "%enter%"=="A" goto adslcj
if /i "%enter%"=="B" goto adslbh
if /i "%enter%"=="C" goto adsldk
if /i "%enter%"=="Y" goto net
:adslcj
setlocal enabledelayedexpansion
cls
echo/
echo                宽带自动连接设置系统
echo.
set /p adslzh=     请输入宽带连接的账号:
echo/
set /p adslmm=     请输入宽带连接的密码:
echo/
del c:\docume~1\admini~1\桌面\宽带连接.lnk
del c:\docume~1\alluse~1\桌面\宽带连接.lnk
del %TEMP%\lianjie.vbs
echo set a=createobject("wscript.shell")>%TEMP%\lianjie.vbs
echo a.run "control folders">>%TEMP%\lianjie.vbs
echo WScript.Sleep 800>>%TEMP%\lianjie.vbs
echo a.AppActivate "文件夹选项">>%TEMP%\lianjie.vbs
echo WScript.Sleep 500>>%TEMP%\lianjie.vbs
echo a.SendKeys "ff">>%TEMP%\lianjie.vbs
echo WScript.Sleep 200>>%TEMP%\lianjie.vbs
echo a.SendKeys "{ENTER}">>%TEMP%\lianjie.vbs
echo WScript.Sleep 200>>%TEMP%\lianjie.vbs
echo a.run "cmd /c start rasphone -h 宽带连接">>%TEMP%\lianjie.vbs
echo WScript.Sleep 200>>%TEMP%\lianjie.vbs
echo a.run "cmd /c start rasphone -r 宽带连接">>%TEMP%\lianjie.vbs
echo WScript.Sleep 200>>%TEMP%\lianjie.vbs
echo a.run "cmd /c start ncpa.cpl">>%TEMP%\lianjie.vbs
echo WScript.Sleep 800>>%TEMP%\lianjie.vbs
echo a.AppActivate "网络连接">>%TEMP%\lianjie.vbs
echo WScript.Sleep 500>>%TEMP%\lianjie.vbs
echo a.SendKeys "{TAB 3}">>%TEMP%\lianjie.vbs
echo WScript.Sleep 200>>%TEMP%\lianjie.vbs
echo a.SendKeys "{ENTER}">>%TEMP%\lianjie.vbs
echo WScript.Sleep 800>>%TEMP%\lianjie.vbs
echo a.SendKeys "{ENTER}">>%TEMP%\lianjie.vbs
echo WScript.Sleep 200>>%TEMP%\lianjie.vbs
echo a.SendKeys "{ENTER}">>%TEMP%\lianjie.vbs
echo WScript.Sleep 200>>%TEMP%\lianjie.vbs
echo a.SendKeys "{m}">>%TEMP%\lianjie.vbs
echo WScript.Sleep 200>>%TEMP%\lianjie.vbs
echo a.SendKeys "{ENTER}">>%TEMP%\lianjie.vbs
echo WScript.Sleep 200>>%TEMP%\lianjie.vbs
echo a.SendKeys "{u}">>%TEMP%\lianjie.vbs
echo WScript.Sleep 200>>%TEMP%\lianjie.vbs
echo a.SendKeys "{ENTER 2}">>%TEMP%\lianjie.vbs
echo WScript.Sleep 200>>%TEMP%\lianjie.vbs
echo a.SendKeys "%adslzh%">>%TEMP%\lianjie.vbs
echo WScript.Sleep 200>>%TEMP%\lianjie.vbs
echo a.SendKeys "{TAB}">>%TEMP%\lianjie.vbs
echo WScript.Sleep 200>>%TEMP%\lianjie.vbs
echo a.SendKeys "%adslmm%">>%TEMP%\lianjie.vbs
echo WScript.Sleep 200>>%TEMP%\lianjie.vbs
echo a.SendKeys "{TAB}">>%TEMP%\lianjie.vbs
echo WScript.Sleep 200>>%TEMP%\lianjie.vbs
echo a.SendKeys "%adslmm%">>%TEMP%\lianjie.vbs
echo WScript.Sleep 200>>%TEMP%\lianjie.vbs
echo a.SendKeys "{TAB}">>%TEMP%\lianjie.vbs
echo WScript.Sleep 200>>%TEMP%\lianjie.vbs
echo a.SendKeys "{ENTER}">>%TEMP%\lianjie.vbs
echo WScript.Sleep 200>>%TEMP%\lianjie.vbs
echo a.SendKeys "{ }">>%TEMP%\lianjie.vbs
echo WScript.Sleep 200>>%TEMP%\lianjie.vbs
echo a.SendKeys "{ENTER}">>%TEMP%\lianjie.vbs
echo WScript.Sleep 200>>%TEMP%\lianjie.vbs
echo a.AppActivate "连接 宽带连接">>%TEMP%\lianjie.vbs
echo WScript.Sleep 200>>%TEMP%\lianjie.vbs
echo a.SendKeys "{ENTER 3}">>%TEMP%\lianjie.vbs
echo WScript.Sleep 200>>%TEMP%\lianjie.vbs
echo a.run "cmd /c start /max rasphone -e 宽带连接">>%TEMP%\lianjie.vbs
echo WScript.Sleep 800>>%TEMP%\lianjie.vbs
echo a.AppActivate "宽带连接 属性">>%TEMP%\lianjie.vbs
echo WScript.Sleep 200>>%TEMP%\lianjie.vbs
echo a.SendKeys "{TAB 4}">>%TEMP%\lianjie.vbs
echo WScript.Sleep 200>>%TEMP%\lianjie.vbs
echo a.SendKeys "{RIGHT}">>%TEMP%\lianjie.vbs
echo WScript.Sleep 200>>%TEMP%\lianjie.vbs
echo a.SendKeys "{TAB}">>%TEMP%\lianjie.vbs
echo a.SendKeys "{ }">>%TEMP%\lianjie.vbs
echo a.SendKeys "{TAB}">>%TEMP%\lianjie.vbs
echo a.SendKeys "{ }">>%TEMP%\lianjie.vbs
echo a.SendKeys "{TAB 2}">>%TEMP%\lianjie.vbs
echo WScript.Sleep 200>>%TEMP%\lianjie.vbs
echo a.SendKeys "99">>%TEMP%\lianjie.vbs
echo a.SendKeys "{ENTER}">>%TEMP%\lianjie.vbs
echo a.run "cmd /c start rasphone -d 宽带连接">>%TEMP%\lianjie.vbs
start %TEMP%\lianjie.vbs
cls
reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run" /v ADSL /t REG_SZ /d "c:\windows\system32\rasphone -d 宽带连接" /f
pause >nul
goto adsl
:adslbh
cls
echo/
echo.                    请输入相关信息
echo.             ------------------------
echo/
set /p adslzh=     请输入宽带连接的账号:
echo/
set /p adslmm=     请输入宽带连接的密码:
echo/
rasdial 宽带连接 %adslzh% %adslmm%
echo/
echo.              任务已完成,创建开机启动请按 Y 键。
echo/
echo                        任意键返回操作
set /p enter=            :
if not "%enter%"=="" set enter=%enter:~0,1%
if /i "%enter%"=="Y" (goto kaijiqd) else (goto adsl)
:kaijiqd
echo rasdial 宽带连接 %adslzh% %adslmm%>adsl.bat
echo/
echo.  *请将当前目录下的adsl.bat拖放到-开始-程序-启动里*
echo/
echo.                 已完成,任意键返回。
pause >nul
goto adsl
:adsldk
cls
rasphone -h adsl
echo        已断开ADSL连接,按任意键返回!
pause >nul
goto adsl

         网上看到的,感觉不错,所以就拿出来晒晒~~~~~

 

                   首页:http://www.2345.com/?kwimmnl

  评论这张
 
阅读(718)| 评论(0)
推荐 转载

历史上的今天

评论

<#--最新日志,群博日志--> <#--推荐日志--> <#--引用记录--> <#--博主推荐--> <#--随机阅读--> <#--首页推荐--> <#--历史上的今天--> <#--被推荐日志--> <#--上一篇,下一篇--> <#-- 热度 --> <#-- 网易新闻广告 --> <#--右边模块结构--> <#--评论模块结构--> <#--引用模块结构--> <#--博主发起的投票-->
 
 
 
 
 
 
 
 
 
 
 
 
 
 

页脚

网易公司版权所有 ©1997-2017