- @echo off
%1 mshta vbscript:CreateObject(“Shell.Application”).ShellExecute(“cmd.exe”,”/c %~s0 ::”,””,”runas”,1)(window.close)&&exit
cd /d “%~dp0” - #获取管理权限
netsh interface ip set address name=”以太网” source=dhcp
netsh interface ip set dnsservers “以太网” source=dhcp
ipconfig /flushdns - #改成自动获取
@echo off
%1 mshta vbscript:CreateObject(“Shell.Application”).ShellExecute(“cmd.exe”,”/c %~s0 ::”,””,”runas”,1)(window.close)&&exit
cd /d “%~dp0”
#获取管理权限
#rem 设置要更改的网络参数
set “newIP=192.168.0.800”
set “newSubnetMask=255.255.255.0”
set “newGateway=192.168.0.1”
set “newDNSPrimary=8.8.8.8”
set “newDNSBackup=114.114.114.114”
set “connectionName=以太网” #rem 请根据实际情况修改连接名称
#rem 更改 IP 地址、子网掩码、默认网关和 DNS
netsh interface ipv4 set address name=”%connectionName%” source=static address=%newIP% mask=%newSubnetMask% gateway=%newGateway%
netsh interface ipv4 set dns name=”%connectionName%” source=static address=%newDNSPrimary%
netsh interface ipv4 add dns name=”%connectionName%” address=%newDNSBackup% index=2
echo IP 地址更改完成！
