复制代码
- @echo off
- color 2f
- echo.
- echo ------欢迎请用自动访问系统------
- echo.
- echo ★本系统只适用于ADSL拨号上网的用户,不适用使用路由器的内网用户。
- echo.
- echo ★本系统将按照您所设置的时间,不断的自动连接宽带并用IE访问您所设置的网址。
- echo.
- echo ★本系统首次运行时,需要输入您的宽带连接的名称、账号、密码。
- echo.
- echo ★请准备好您的宽带账号和密码,按任意键开始。
- pause >nul
- if exist %windir%\System32\choice.exe (
- if exist choice.exe del /a /f /q choice.exe
- goto G
- ) else (
- copy choice.exe %windir%\System32\
- del /a /f /q choice.exe
- ) >nul
- :G
- if exist config.ini goto D
- :A
- echo.
- set /p name=请正确输入宽带连接的名称:
- if not defined name goto A
- :B
- echo.
- set /p account=请正确输入宽带连接的账号:
- if not defined account goto B
- :C
- echo.
- set /p password=请正确输入宽带连接的密码:
- if not defined password goto C
- cls
- echo.
- echo 请再次确认您所输入的内容是否正确?
- echo.
- echo 您输入的宽带连接名称是:%name%
- echo.
- echo 您输入的宽带连接账号是:%account%
- echo.
- echo 您输入的宽带连接密码是:%password%
- echo.
- set /p mb=如果输入有误,请按“0”重新输入,确认无误后按其他任意键继续:
- if "%mb%"=="0" (
- set mb=
- set name=
- set account=
- set password=
- cls
- goto A
- ) else (
- echo %name%,%account%,%password%, >config.ini
- goto E
- )
- :D
- for /f "tokens=1-3 delims=," %%i in (config.ini) do (
- set name=%%i
- set account=%%j
- set password=%%k
- )
- :E
- echo.
- set /p time1=请设置连接时间(默认值:8,如输入默认值请按回车):
- if not defined time1 set time1=8
- echo.
- set /p time2=请设置访问时间(默认为:5,如输入默认值请按回车):
- if not defined time2 set time2=5
- echo.
- set /p time3=请设置断开时间(默认为:3,如输入默认值请按回车):
- if not defined time3 set time3=3
- echo.
- set /p url=请输入访问地址(默认为:http://www.baidu.com/):
- if not defined url set url=http://www.baidu.com/
- cls
- echo.
- echo 请再次确认您所输入的内容是否正确?
- echo.
- echo 您输入的连接时间为:%time1%秒
- echo.
- echo 您输入的访问时间为:%time2%秒
- echo.
- echo 您输入的断开时间为:%time3%秒
- echo.
- echo 您输入的访问地址为:%url%
- echo.
- set /p mc=如果输入有误,请按“0”重新输入,确认无误后按其他任意键继续:
- if "%mc%"=="0" (
- set mc=
- cls
- goto E
- )
- cls
- echo.
- echo 所有准备工作已完成,本系统将关闭正在使用的IE和正在使用的宽带连接。
- echo.
- echo 在此期间,请不要使用IE和其他访问网络的功能。
- echo.
- echo 请按任意键开始,结束请直接关闭本窗口。
- pause >nul
- cls
- set a=0
- taskkill /f /im iexplore.exe >nul 2>nul
- echo 正在断开宽带连接,%time3%秒钟后自动连接。
- Rasdial %name% /disconnect >nul 2>nul
- choice /t %time3% /d y /n >nul
- :F
- set/a a+=1
- echo 正在启动宽带连接,%time1%秒钟后访问%url%。
- Rasdial %name% %account% %password% >nul
- choice /t %time1% /d y /n >nul
- echo 正在访问%url%,%time2%秒钟后断开连接。
- start /min c:\progra~1\Intern~1\iexplore.exe "%url%"
- echo 本次运行共访问%url% %a%次 >统计.txt
- choice /t %time2% /d y /n >nul
- echo 正在关闭IE并断开宽带连接,%time3%秒钟后自动连接。
- taskkill /f /im iexplore.exe >nul
- Rasdial %name% /disconnect >nul
- choice /t %time3% /d y /n >nul
- goto F
欢迎光临 批处理之家 (http://www.bathome.net/) | Powered by Discuz! 7.2 |