关于网络配置和系统服务的一些问题:PPPOE ERROR 711 Repair Tool

  1 ::请勿随意修改此文件,以避免不可预知的错误 gwsbhqt@163.com@2015/10/31
  2 
  3 @echo off
  4 color 0A
  5 setlocal enabledelayedexpansion
  6 title PPPOE 711错误 修复工具     Made by gwsbhqt@163.com
  7 
  8 echo 如有任何问题请与 gwsbhqt@163.com 联系 & echo.
  9 set /p flag=继续?(y/n) : 
 10 if /i %flag% EQU y (cls & echo 请稍候... & echo.) else (exit)
 11 
 12 set flag=F
 13 set string=系统支持
 14 ver | find " 6" >nul 2>nul && set flag=T
 15 ver | find " 10" >nul 2>nul && set flag=T
 16 if %flag% EQU T (echo %string% √) else (echo %string% × & pause > nul & go to error)
 17 
 18 set string=以管理员身份运行
 19 reg query HKU\S-1-5-19\ >nul 2>nul
 20 if %errorlevel% EQU 0 (echo %string% √) else (echo %string% × & pause > nul & go to error)
 21 
 22 for /l %%i in (1, 1, 5) do (
 23     if %%i EQU 1 set FileName=takeown
 24     if %%i EQU 2 set FileName=icacls
 25     if %%i EQU 3 set FileName=reg
 26     if %%i EQU 4 set FileName=sc
 27     if %%i EQU 5 set FileName=ping
 28 
 29     set string=!FileName!.exe 文件存在
 30     if exist %windir%\System32\!FileName!.exe (echo !string! √) else (echo !string! × & pause > nul & go to error)
 31 )
 32 
 33 for /l %%i in (1, 1, 4) do (
 34     if %%i EQU 1 set FilePath=LogFiles& set sn=LogFiles
 35     if %%i EQU 2 set FilePath=LogFiles\WMI& set sn=WMI
 36     if %%i EQU 3 set FilePath=wbem& set sn=wbem
 37     if %%i EQU 4 set FilePath=drivers\etc& set sn=etc
 38 
 39     set flag=F& set flag2=F& set flag3=F& set flag4=F& set flag5=F& set flag6=F& set flag7=F
 40     set string=!sn! 目录所有者及权限
 41     takeown /f %windir%\System32\!FilePath!\ /r /d y >nul 2>nul && set flag=T
 42     icacls %windir%\System32\!FilePath!\ /reset /t /c /q >nul 2>nul && set flag2=T
 43     icacls %windir%\System32\!FilePath!\ /setowner %username% /t /c /q >nul 2>nul && set flag3=T
 44     icacls %windir%\System32\!FilePath!\ /grant:r system:f /t /c /q >nul 2>nul && set flag4=T
 45     icacls %windir%\System32\!FilePath!\ /grant:r everyone:f /t /c /q >nul 2>nul && set flag5=T
 46     icacls %windir%\System32\!FilePath!\ /grant:r %username%:f /t /c /q >nul 2>nul && set flag6=T
 47     icacls %windir%\System32\!FilePath!\ /grant:r administrators:f /t /c /q >nul 2>nul && set flag7=T
 48     if !flag!!flag2!!flag3!!flag4!!flag5!!flag6!!flag7! EQU TTTTTTT (echo !string! √) else (echo !string! ×)
 49 )
 50 
 51 set RegeditPath=HKLM\System\CurrentControlSet\services\eventlog\Parameters
 52 set string=Parameters 注册表项不存在
 53 reg query %RegeditPath% >nul 2>nul
 54 if %errorlevel% EQU 0 (reg delete %RegeditPath% >nul 2>nul)
 55 reg query %RegeditPath% >nul 2>nul
 56 if %errorlevel% NEQ 0 (echo %string% √) else (echo %string% ×)
 57 
 58 for /l %%i in (1, 1, 16) do (
 59     if %%i EQU 1 set ServiceName=eventlog& set ShowName=Windows Event Log
 60     if %%i EQU 2 set ServiceName=DcomLaunch& set ShowName=DCOM Server Process Launcher
 61     if %%i EQU 3 set ServiceName=RpcEptMapper& set ShowName=RPC Endpoint Mapper
 62     if %%i EQU 4 set ServiceName=RpcSs& set ShowName=Remote Procedure Call [RPC]
 63     if %%i EQU 5 set ServiceName=PlugPlay& set ShowName=Plug and Play
 64     if %%i EQU 6 set ServiceName=TapiSrv& set ShowName=Telephony
 65     if %%i EQU 7 set ServiceName=BFE& set ShowName=Base Filtering Engine
 66     if %%i EQU 8 set ServiceName=IKEEXT& set ShowName=IKE and AuthIP IPsec Keying Modules
 67     if %%i EQU 9 set ServiceName=PolicyAgent& set ShowName=IPsec Policy Agent
 68     if %%i EQU 10 set ServiceName=nsi& set ShowName=Network Store Interface Service
 69     if %%i EQU 11 set ServiceName=Netman& set ShowName=Network Connections
 70     if %%i EQU 12 set ServiceName=Winmgmt& set ShowName=Windows Management Instrumentation
 71     if %%i EQU 13 set ServiceName=SstpSvc& set ShowName=*Secure Sckoet Tunneling Protocol Service
 72     if %%i EQU 14 set ServiceName=RasMan& set ShowName=*Remote Access Connection Manager
 73     if %%i EQU 15 set ServiceName=RasAuto& set ShowName=*Remote Access Auto Connection Manager
 74     if %%i EQU 16 set ServiceName=RemoteAccess& set ShowName=Routing and Remote Access
 75 
 76     set flag=F
 77     set string=!ShowName! 服务启动
 78     sc config !ServiceName! start= auto >nul 2>nul
 79     sc start !ServiceName! >nul 2>nul
 80     ping 0 /n 3 >nul 2>nul
 81     sc query !ServiceName! | find "RUNNING" >nul 2>nul && set flag=T
 82     if !flag! EQU T (echo !string! √) else (echo !string! ×)
 83 )
 84 
 85 set flag=F
 86 set string=Internet Connection Sharing [ICS] 服务禁止
 87 sc config SharedAccess start= disabled >nul 2>nul
 88 sc stop SharedAccess >nul 2>nul
 89 ping 0 /n 3 >nul 2>nul
 90 sc query SharedAccess | find "STOPPED" >nul 2>nul && set flag=T
 91 if !flag! EQU T (echo %string% √) else (echo %string% ×)
 92 
 93 set flag=F
 94 set string=HOSTS 文件重置
 95 set FilePath=%windir%\System32\drivers\etc\hosts
 96 del /f /s /q %FilePath% >nul 2>nul
 97 (echo.> %FilePath%) >nul 2>nul && set flag=T
 98 if !flag! EQU T (echo %string% √) else (echo %string% ×)
 99 
100 for /l %%i in (1, 1, 7) do (
101     if %%i EQU 1 set command=ipconfig /release& set string=释放网络连接
102     if %%i EQU 2 set command=ipconfig /renew& set string=更新网络适配器
103     if %%i EQU 3 set command=ipconfig /flushdns& set string=清空DNS缓存
104     if %%i EQU 4 set command=ipconfig /registerdns& set string=刷新DHCP租约并重新注册DNS
105     if %%i EQU 5 set command=arp /d& set string=清空ARP缓存
106     if %%i EQU 6 set command=nbtstat /r& set string=重新加载远程缓存
107     if %%i EQU 7 set command=nbtstat /rr& set string=释放刷新远程缓存
108 
109     set flag=F
110     !command! >nul 2>nul && set flag=T
111     if !flag! EQU T (echo !string! √) else (echo !string! ×)
112 )
113 
114 for /l %%i in (10, -1, 1) do (
115     cls & echo 尝试修复完成但不保证成功 & echo.
116     echo 剩余 %%i 秒重启...
117     ping 0 /n 2 >nul 2>nul
118 )
119 shutdown /r /f /t 0 >nul 2>nul & exit
120 
121 exit
122 :error
123 echo. & echo 发现致命错误,修复无法继续...
124 pause > nul