修改以太网卡IP.bat

@echo off
%1 mshta vbscript:CreateObject("Shell.Application").ShellExecute("cmd.exe","/c %~s0 ::","","runas",1)(window.close)&&exit //自动启用管理员模式
cd /d "%~dp0"
rem eth //eth 网卡名称，可在网络连接中查询，如"以太网"
set eth="以太网"
echo 开始设置IP地址...
 
rem pcip //pcip 为你想更改的PC端IP(DHCP:9.9.9.253)
set  pcipinput=9.9.9.253
@set /p pcipinput=设置PC本端IP(若开启DHCP服务或接入互联网，则为当前默认值9.9.9.253)：
set pcip=%pcipinput%
 
rem oppositeip //PC网口对端设备IP地址
set  oppositeipinput=127.0.0.1
@set /p oppositeipinput=设置PC网口对端设备IP地址(初始默认值127.0.0.1，适用于仅修改本端不测试连通)：
set oppositeip=%oppositeipinput%
 
rem netmasks //netmasks 为子网掩码
set  netmasksinput=255.255.255.0
@set /p netmasksinput=设置PC本端子网掩码(默认255.255.255.0)：
set netmasks=%netmasksinput%
 
rem gw //gw 为网关地址 (DHCP:9.9.9.1)
set  gwinput=9.9.9.1
@set /p gwinput=设置PC本端网关地址(默认9.9.9.1)：
set gw=%gwinput%
 
 
echo 正在将 %eth%卡IP改为: %pcip%
rem
if %gw%==none netsh interface ip set address %eth% static %pcip% %netmasks% %gw% > nul
if not %gw%==none netsh interface ip set address %eth% static %pcip% %netmasks% %gw% 1 > nul
echo.........................
echo 修改完成！
rem echo 检查当前本机IP：
rem netsh interface ip show ipaddresses %eth%
echo.........................
echo ping测PC网口对端设备IP地址
ping  %oppositeip%
echo.........................
@set /p goon=继续测试（请输入命令，或关闭窗口）：
%goon%
echo.........................
 
@set /p goon1=继续测试（请输入命令，或关闭窗口）：
%goon1%
echo.........................
 
@set /p goon2=继续测试（请输入命令，或关闭窗口）：
%goon2%
echo.........................
 
@set /p goon3=继续测试（请输入命令，或关闭窗口）：
%goon3%
echo.........................
 
@set /p goon4=继续测试（请输入命令，或关闭窗口）：
%goon4%
echo.........................
 
@set /p goon5=继续测试（请输入命令，或关闭窗口）：
%goon5%
echo.........................