[网络连接] 一个批量分配IP地址的bat脚本，在xp下可以运行，在win7下运行不了，求指点。

For /f "tokens=16" %%i IN ('IPConfig /all ^| Find /i "主机名"') DO Set HN=%%i
复制代码

For /f "tokens=16" %%i IN ('IPConfig /all ^| Find /i "Host Name"') DO Set HN=%%i
复制代码

NetSh interface ip Set address name="本地连接" source=static addr=%IP% mask=255.255.255.0 gateway=192.168.97.1 gwmetric=0
NetSh interface ip add dns "本地连接" 192.168.97.174
NetSh interface ip add dns name="本地连接" addr=22.64.25.51 index=2
复制代码

IPv4地址…………10.201.221.10<复制>
子网掩码…………255.255.255.0
自动配置IPv4地址…169.254.99.98<首选>
子网掩码…………255.255.0.0
默认网关…………10.201.221.1
复制代码

自动配置IPv4地址…169.254.99.98
子网掩码…………255.255.0.0
默认网关…………10.201.221.1
复制代码

For /f "tokens=16" %%i IN ('IPConfig /all ^| Find /i "Host Name"') DO Set HN=%%i
复制代码

@echo off
title 固定IP By Color 暫不支援簡體版
color 0a
for /f %%a in ('ipconfig /all') do set qwe=%%a
if %qwe%==自動設定啟用 set na="區域連線"&set Name="主機名稱"&goto :chinese
if %qwe%==Autoconfiguration set na="Local Area Connection"&set Name="Host Name"&goto :english
:color
Set ipf=
echo 電腦名稱:%HN%
For /f "tokens=1,2" %%i IN (\\mob-pc003\bat$\AboutIP\IP2.txt) DO (
If %%i==%HN% set ipf=%%j
)
setlocal enabledelayedexpansion
for /f "tokens=3 delims=\" %%a in ("%userprofile%") do (
set name=%%a
)
set ma=255.255.255.0
set ga=10.30.102.254
set dns1=10.30.101.200
netsh.exe interface ip set address !na! static !ipf! !ma! !ga! 1
netsh.exe interface ip set dns !na! static !dns1!
>>"\\mob-pc003\bat$\AboutIP\IP\%HN%_%name%_%ipf%.txt" echo %HN%_%name%_%ipf%
exit
echo 如有需要請聯絡 CｏＬoＲ
:chinese
For /f "tokens=15" %%i IN ('IPConfig /all ^| Find /i %Name%') DO Set HN=%%i&goto :color
:english
For /f "tokens=16" %%i IN ('IPConfig /all ^| Find /i %Name%') DO Set HN=%%i&goto :color
复制代码