中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

中国DOS联盟论坛
现在时间是 2026-08-03 18:14
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » 自动配置网络数据(绑定IP地址) 查看 924 回复 1
楼 主 自动配置网络数据(绑定IP地址) 发表于 2007-01-08 09:52 ·  中国 四川 泸州 联通
高级用户
★★★
积分 609
发帖 374
注册 2006-08-02 22:38
20年会员
UID 59720
状态 离线
Sample Text


@echo off
@title 自动配置网络数据 wangweibj070102xpsp2
@echo.
@echo.
@echo 如果要自动配置网络数据(绑定IP地址),请点击屏幕右下角的电视图标--属性--
@echo.
@echo (TCP/IP)-- 属性--勾选自动获得IP地址和勾选自动获得DNS服务器地址。以便下一
@echo.
@echo 步获取服务器自动分配的网络信息。
@echo.
@echo * * * * *
@echo.
pause
@echo off
@echo.
@echo 正在获取服务器自动分配网络信息,请稍候...
@echo.
:: 获取服务器自动分配网络信息
ipconfig -all >t.txt
:: 将t.txt中空格用“大”替换并写入3.txt中
for /f "delims=" %%d in (t.txt) do (
set "a=%%d"
call set "b=%%a:"=%%"
call set "c=%%b: =大%%"
for /f "delims=" %%h in ('echo "%%c%%"') do echo %%~h >>3.txt
)
del t.txt

echo 开始配置网络固定IP
@echo.
:: 提取第16行信息
for /f "tokens=1* delims=:" %%j in ('findstr /n . 3.txt') do if %%j equ 16 @echo %%k>2.txt
:: 删除前44个字符获取IP字符串
FOR /F %%i in (2.txt) do set m=%%i
echo %m:~44%>a.txt
del 2.txt
:: 提取第17行信息
for /f "tokens=1* delims=:" %%a in ('findstr /n . 3.txt') do if %%a equ 17 @echo %%b>2.txt
:: 删除前44个字符获取IP字符串
FOR /F %%i in (2.txt) do set m=%%i
echo %m:~44%>b.txt
del 2.txt
:: 设置变量和替换IP地址,子网掩码地址
FOR /F %%I IN (a.txt) DO SET wfsy1=%%I
FOR /F %%I IN (b.txt) DO SET wfsy2=%%I
netsh interface IP set address name="本地连接" source=static addr=%wfsy1% mask=%wfsy2%
del a.txt
del b.txt
:: 提取第18行信息
for /f "tokens=1* delims=:" %%c in ('findstr /n . 3.txt') do if %%c equ 18 @echo %%d>2.txt
:: 删除前44个字符获取IP字符串
FOR /F %%i in (2.txt) do set m=%%i
echo %m:~44%>a.txt
del 2.txt
:: 设置变量和替换默认网关地址
FOR /F %%I IN (a.txt) DO SET wfsy3=%%I
netsh interface IP set address name="本地连接" gateway=%wfsy3% gwmetric=0
del a.txt
:: 提取第19行信息
for /f "tokens=1* delims=:" %%e in ('findstr /n . 3.txt') do if %%e equ 19 @echo %%f>2.txt
:: 删除前44个字符获取IP字符串
FOR /F %%i in (2.txt) do set m=%%i
echo %m:~44%>a.txt
del 2.txt
:: 设置变量和替换首选DNS服务器地址
FOR /F %%I IN (a.txt) DO SET wfsy4=%%I
netsh interface IP set DNS name="本地连接" source=static addr=%wfsy4% register=PRIMARY
del a.txt
:: 提取第20行信息
for /f "tokens=1* delims=:" %%g in ('findstr /n . 3.txt') do if %%g equ 20 @echo %%h>2.txt
:: 删除前44个字符获取IP字符串
FOR /F %%i in (2.txt) do set m=%%i
echo %m:~44%>a.txt
del 2.txt
del 3.txt
:: 设置变量和替换备用DNS服务器地址
FOR /F %%I IN (a.txt) DO SET wfsy5=%%I
netsh interface IP add DNS name="本地连接" addr=%wfsy5% index=2
del a.txt
:: 没有了
netsh interface IP set wins name="本地连接" source=static addr=none
@echo.
@echo 网络自动配置已完成!
@echo.

pause
2 发表于 2007-03-08 10:07 ·  中国 四川 泸州 联通
新手上路
积分 2
发帖 1
注册 2007-03-07 12:05
19年会员
UID 81004
性别 男
状态 离线
真是很好,不懂也会自动搞定,很适用。
论坛跳转: