@echo off
color 3e
ECHO. 正在启用超级管理员权限
%1 %2
ver|find "5.">nul&&goto :st
mshta vbscript:createobject("shell.application").shellexecute("%~s0","goto :st","","runas",1)(window.close)&goto :eof
:st
copy "%~0" "%windir%\system32\" >nul
ECHO. 启用超级管理员权限成功
ECHO.
ECHO. 输入数字并回车 执行操作
ECHO. BY——机电系21级某位闲的无聊的人
ECHO. 有什么用嘛...十点半后 我懒得拔网线了 (〃'▽'〃)
ECHO. 然后就写了这个程序
ECHO. 运行要等待几秒哦~
ECHO. 第二天记得切换回来哟 (~ ̄▽ ̄)~
ECHO. 禁止商用哦~
ECHO.
goto menu
:menu
ECHO. 1切换至无线网络 2切换至有线网络 3退出程序
ECHO. 请输入选择项目的序号并回车:
set /p ID=
if “%id%”==“1” goto cmd1
if “%id%”==“2” goto cmd2
if “%id%”==“3” goto cmd3
:cmd1
netsh interface set interface "Netkeeper" DISABLED >nul
netsh interface set interface "以太网" DISABLED >nul
netsh interface set interface "以太网 1" DISABLED >nul
netsh interface set interface "以太网 2" DISABLED >nul
netsh interface set interface "以太网 3" DISABLED >nul
netsh interface set interface "以太网 4" DISABLED >nul
netsh interface set interface "以太网 5" DISABLED >nul
netsh interface set interface "以太网 6" DISABLED >nul
netsh interface set interface "以太网 7" DISABLED >nul
netsh interface set interface "以太网 8" DISABLED >nul
netsh interface set interface "以太网 9" DISABLED >nul
netsh interface set interface "WLAN" ENABLED
ECHO. 成功执行本操作( ̄▽ ̄)/
ECHO.
goto menu
:cmd2
netsh interface set interface "WLAN" DISABLED >nul
netsh interface set interface "Netkeeper" ENABLED >nul
netsh interface set interface "以太网" ENABLED >nul
netsh interface set interface "以太网 1" ENABLED >nul
netsh interface set interface "以太网 2" ENABLED >nul
netsh interface set interface "以太网 3" ENABLED >nul
netsh interface set interface "以太网 4" ENABLED >nul
netsh interface set interface "以太网 5" ENABLED >nul
netsh interface set interface "以太网 6" ENABLED >nul
netsh interface set interface "以太网 7" ENABLED >nul
netsh interface set interface "以太网 8" ENABLED >nul
netsh interface set interface "以太网 9" ENABLED >nul
ECHO. 成功执行本操作( ̄▽ ̄)/
ECHO.
goto menu
:cmd3
exit
BAT程序 注意哦 是ANSI编码 不是UTF-8 否则是乱码
直接复制粘贴即可
最后于 2022-5-27
被云叠梦编辑
,原因:
Minecraft玩家