啟用禁用網絡

@echo off :: BatchGotAdmin 
:------------------------------------- 
REM --> Check for permissions 
>nul 2>&1 "%SYSTEMROOT%\system32\cacls.exe" "%SYSTEMROOT%\system32\config\system" REM --> If error flag set, we do not have admin. 
if '%errorlevel%' NEQ '0' ( echo Requesting administrative privileges... goto UACPrompt 
) else ( goto gotAdmin ) :UACPrompt echo Set UAC = CreateObject^("Shell.Application"^) > "%temp%\getadmin.vbs" echo UAC.ShellExecute "%~s0", "", "", "runas", 1 >> "%temp%\getadmin.vbs" "%temp%\getadmin.vbs" exit /B :gotAdmin if exist "%temp%\getadmin.vbs" ( del "%temp%\getadmin.vbs" ) pushd "%CD%" CD /D "%~dp0" 
:-------------------------------------- cls
@ECHO OFF
title 啟用或禁用網絡
CLS
color 0a
GOTO MENU
:MENU
ECHO.
ECHO. ==============啟用禁用本地連接==============
ECHO.
ECHO. 1 禁用本地連接
ECHO. 2 啟用本地連接
ECHO. 3 禁用WIFI
ECHO. 4 啟用WIFI
ECHO. 0 退 出
ECHO. ==========================================
ECHO.
ECHO.
echo. 請輸入選擇項目的序號：
set /p ID=
if "%id%"=="1" goto qiyong
if "%id%"=="2" goto jinyongif "%id%"=="3" goto DISABLED_WIFI
if "%id%"=="4" goto enable_wifiif "%id%"=="0" exit
PAUSE
:qiyong
echo 禁用本地連接
netsh interface set interface name="以太網" admin=DISABLED
goto MENU
:jinyong
echo 啟用本地連接
netsh interface set interface name="以太網" admin=ENABLED
GOTO MENU:DISABLED_WIFI
echo 禁用WIFI
netsh interface set interface name="WLAN" admin=DISABLED
goto MENU
:enable_wifi
echo 啟用WIFI
netsh interface set interface name="WLAN" admin=enable
GOTO MENU

切換ip地址

@echo off
title 切換IP地址
rem off 就會只顯示echo的描述
rem 延遲變量，變量獲得及時性
setlocal enabledelayedexpansion
color 71
%1 start "" mshta vbscript:CreateObject("Shell.Application").ShellExecute("cmd.exe","/c ""%~s0"" ::","","runas",1)(window.close)&&exit:startipset NAME=以太網
set MASK=255.255.255.0echo 修改ip地址：0:退出,1:自動獲取ip, 2:手動輸入ip地址,ip:網絡配置
echo yz:渝中,yc:永川...（首字母小寫）
set sel=
set/p sel=請選擇修改方式：
if "%sel%"=="0" goto end
if "%sel%"=="1" goto auto
if "%sel%"=="2" goto inputIp
if "%sel%"=="ip" goto ipconfigif "%sel%"=="yz" goto yz
if "%sel%"=="yc" goto ycecho 您沒有選擇修改方式。
goto end:yc
set IP=10.0.0.0
set GATE=10.0.0.254
goto setIp:yz
set IP=172.0.0.0
set MASK=255.255.254.0
set GATE=172.0.0.254
echo 更改為%sel%！
goto setIp:auto "以太網"如果網絡名稱帶后綴的話中間有空格
::netsh interface ip set address name ="以太網 5" source = dhcp
::netsh interface ip set dns name ="以太網 5" source = dhcp
netsh interface ip set address name=%NAME% source=dhcp
netsh interface ip delete dns %NAME% all
ipconfig /flushdns
echo 更改IP地址完成！
goto startip:inputIp 
cls
Call :displayIPinfo disp
echo.
set /p IPin= IP地址: 
set /p "MASK= 子網掩碼:【按下回車為%MASK%】"
set /p GATEin= 網  關: 
echo..........
netsh interface ip set address %NAME% static %IPin% %MASK% %GATEin% 
echo.請稍等...
choice /t 4 /d y /n >nul
echo..........
cls
Call :displayIPinfo disp
echo.
goto startip:setIp
netsh interface ipv4 set address %NAME% static %IP% %MASK% %GATE%
choice /t 4 /d y /n >nul
echo..........
::cls
Call :displayIPinfo disp
echo 更改IP地址完成！"網絡名稱：%NAME%  地址：%IP% 掩碼：%MASK% 網關：%GATE%"
goto startip:ipconfig
ipconfig/all
goto startip:displayIPinfo
for /f "tokens=2 delims=:" %%i in ('ipconfig^|findstr "IPv4"')     do set IPnow=%%i
for /f "tokens=2 delims=:" %%i in ('ipconfig^|findstr "子網掩碼"') do set MASKnow=%%i
for /f "tokens=2 delims=:" %%i in ('ipconfig^|findstr "默認網關"') do set GATEnow=%%i
echo ------------------------------------------
echo 當前IP地址  ：%IPnow%
echo 當前子網掩碼：%MASKnow%
echo 當前默認網關：%GATEnow%:end
rem pause