SunTB编写IP地址设置切换批处理
2020-06-09 13:50:03
供稿：网友
修正一个提取网络连接名称的错误，原因在于之前在FOR中使用空格作为分隔符
如果网络连接名为“本地连接 2”，原来只会识别成“本地连接”，从而导致设置失败
现已更正
说明：1、可以选择要设置的网络连接
2、可以手动设定固定IP，也可以通过DHCP自动获取
3、可以在批处理中预设多组MAC与IP对应数据，当内网有MAC绑定时可快速查询相应IP
4、DNS设置提供四类数据（中国电信、 中国联通/中国网通、中国移动/ 国铁通、内网网关）
DNS为福州地区数据，请自行更改为当地各宽带运营商DNS
5、再添加一功能：在设置完毕后可以选择是否当本机MAC及IP数据添加到本批处理中以便下次自动识别
批处理代码如下：
代码如下:
@title IP地址设置切换批处理 By SunTB
@echo off & setlocal enabledelayedexpansion
if exist "%windir%/system32/slmgr.vbs" (
echo.&echo 本批处理在 VISTA 以及 WIN7 中须以管理员身份运行
echo.&echo 请查看批处理窗口标题栏信息开头是否为“管理员：”
echo.&echo 如符合上述条件可按任意键继续，否则请退出批处理后以管理员身份重新运行
pause>nul
)
set n=0
for /f "delims=:" %%a in ('ipconfig/all^|findstr /i /b /c:"Ethernet adapter"') do (set /a n=!n!+1&set str=%%a&set net!n!=!str:~17!)
set n=0
for /f "tokens=2 delims=:" %%a in ('ipconfig/all^|findstr /i /c:"Description"') do (set /a n=!n!+1&set netcard!n!=%%a)
set n=0
for /f "tokens=2 delims=:" %%a in ('ipconfig/all^|findstr /i /c:"Physical Address"') do (set /a n=!n!+1&set MAC!n!=%%a)
:net
echo.&echo 请选择当前本机要设置的网络链接：
for /l %%a in (1,1,!n!) do (
echo.
echo %%a - !net%%a! - !netcard%%a!
echo MAC 地址：!MAC%%a!
)
echo.&set num=&set /p num=请输入序号并回车加以选择：
cls
if defined net%num% (set NET=!net%num%!&set MAC=!MAC%num%: =!&set MAC=!MAC:~0,17!) else (echo.&echo 输入的序号有误，请重新选择！&goto :net)
:lib
set MASK=255.255.255.0
set GATE=192.168.0.1
cls&echo.&echo 当前 !NET! 的 MAC 为 !MAC!
for /f "tokens=2 delims=[]" %%a in ('findstr /i "!MAC!" %0') do set IP=%%a
if defined IP (
set inbat=1
echo.&echo 在批处理数据库中找到对应数据
echo.&echo IP : !IP!
echo.&echo 子网掩码 : !MASK!
echo.&echo 网关 : !GATE!
echo.&set /p IP=如需改变 IP 数据请手动输入并回车，如取默认值请直接回车 ：
echo.&set /p MASK=如需改变 子网掩码 数据请手动输入并回车，如取默认值请直接回车 ：
echo.&set /p GATE=如需改变 网关 数据请手动输入并回车，如取默认值请直接回车 ：
goto :isp
) else (
set inbat=0
echo.&echo 在批处理数据库中未找到对应 IP ，请手动选择 IP 设置方式
goto :lan
)
:lan
echo.&echo 当前要设置的网络链接是：
