..................................................................................
批处理如下:
@ echo off
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\"
echo 启用超级管理员权限成功
@echo off
netsh interface show interface "以太网" | find "管理状态: 已启用" >nul && (
echo connected - disconnecting...
netsh interface set interface "以太网" disabled
netsh interface set interface "WLAN" enable
echo 当前为WLAN
) || (
echo disconnected - connecting
netsh interface set interface "以太网" enabled
netsh interface set interface "WLAN" disable
echo 当前为以太网
)
pause
exit