windows有线无线网络互切脚本bat

自动切换

有线→无线 、无线→有线

@ 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

选择切换

@ 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 
echo 本地网络与无线网络切换，请输入字符
set /p input= 本地（L） 无线（W）： 
if "%input%"=="L" goto Y 
if "%input%"=="W" goto N 

:Y
echo 启用本地连接
netsh interface set interface name="WLAN" admin=DISABLED
netsh interface set interface name="以太网" admin=ENABLED
pause 
exit 

:N
echo 禁用本地连接
netsh interface set interface name="以太网" admin=DISABLED
netsh interface set interface name="WLAN" admin=ENABLED
pause 
exit