求一个批处理机房ip通过mac 自动换

therfer · 发表于昨天 00:07

帮忙写个win10下通过mac 自动更改固定ip 及计算机名是ip末位的批处理
pc1 192.168.2.1 mac pc1
pc2 192.168.2.2 mac pc2

实现一个批处理机房所有pc ip自动换

熄灭的火焰 · 发表于昨天 08:17

到tongyi.ai上问问，利用winRM PowerShell

简单点的话，在路由器或者交换机上，绑定MAC就行。

holley2008 · 发表于昨天 08:56

本帖最后由 holley2008 于 2024-11-4 08:59 编辑

现在都很少动脑子，先用ai来一遍

@echo off
setlocal
:: 设置 IP 的映射
set "pc1_mac=XX-XX-XX-XX-XX-XX" :: 替换为 PC1 的实际 MAC 地址
set "pc1_ip=192.168.2.1"
set "pc2_mac=YY-YY-YY-YY-YY-YY" :: 替换为 PC2 的实际 MAC 地址
set "pc2_ip=192.168.2.2"
:: 获取当前计算机的 MAC 地址
for /f "tokens=2 delims=:" %%a in ('getmac /fo csv /nh') do (
set "current_mac=%%~a"
)
:: 去除 MAC 地址中的空格
set "current_mac=%current_mac: =%"
:: 从 IP 中提取最后一位作为计算机名
for /f "tokens=3 delims=." %%i in ("%pc1_ip%") do (
set "ip_suffix=%%i"
)
set "computer_name=pc%ip_suffix%"
:: 检查 MAC 地址并设置 IP 和计算机名
if /i "%current_mac%"=="%pc1_mac%" (
echo Setting IP to %pc1_ip% and Computer Name to %computer_name%
netsh interface ip set address "Ethernet" static %pc1_ip% 255.255.255.0
WMIC computersystem where name="%COMPUTERNAME%" call rename name="%computer_name%"
shutdown /r /t 0
) else if /i "%current_mac%"=="%pc2_mac%" (
echo Setting IP to %pc2_ip% and Computer Name to pc%ip_suffix%
netsh interface ip set address "Ethernet" static %pc2_ip% 255.255.255.0
for /f "tokens=3 delims=." %%i in ("%pc2_ip%") do (
set "ip_suffix=%%i"
)
set "computer_name=pc%ip_suffix%"
WMIC computersystem where name="%COMPUTERNAME%" call rename name="%computer_name%"
shutdown /r /t 0
) else (
echo No matching MAC address found. Exiting...
)
endlocal

复制代码

yxldh · 发表于昨天 09:54

楼主想要的是这种吗？

echo off
echo 正在配置IP地址，请稍候……
set "MASK=255.255.255.0"
set "GATEWAY=192.168.1.1"
set "DNS1=8.8.8.8"
set "DNS2=114.114.114.114"
set "WINS=192.168.1.1"
for /f "tokens=*" %%i in ('wmic Nic where "NetEnabled='true'" get MacAddress^,NetConnectionID /format:List^|find "="') do set "%%i"
for /f "delims=:" %%i in ('findstr /n /b /e ::::.*:::: "%~f0"') do (
for /f "tokens=1,2,4" %%i in ('more /e +%%i "%~f0" ^| find /i "%MacAddress::=-%"') do (
set "name=%%i" & set "IP=%%j" & set "Description=%%k"
)
)
if not defined name (
echo;没有匹配的MAC地址 & pause & exit /b
) else if not defined NetConnectionID (
echo;没找到已连接的网络 & pause & exit /b
)
reg add "HKLM\SYSTEM\ControlSet001\Services\lanmanserver\parameters" /v srvcomment /d "%Description%" /f >nul 2>nul
reg add "HKLM\SYSTEM\CurrentControlSet\Services\lanmanserver\parameters" /v srvcomment /d "%Description%" /f >nul 2>nul
reg add "HKLM\System\CurrentControlSet\Control\ComputerName\ComputerName" /v ComputerName /d "%name%" /f >nul 2>nul
reg add "HKLM\System\CurrentControlSet\Services\Tcpip\Parameters" /v "NV Hostname" /d "%name%" /f >nul 2>nul
reg add "HKLM\System\CurrentControlSet\Services\Tcpip\Parameters" /v Hostname /d "%name%" /f >nul 2>nul
netsh interface ip set address "%NetConnectionID%" static %IP% %Mask% %GATEWAY% 1 >nul 2>nul
netsh interface ip set dns "%NetConnectionID%" static %DNS1% register=PRIMARY >nul 2>nul
netsh interface ip add dns "%NetConnectionID%" %DNS2% index=2 >nul 2>nul
netsh interface ip set wins "%NetConnectionID%" static %WINS% >nul 2>nul
pause & exit /b
shutdown -r -t 3
del /q %0
:::: Your IP and MAC Addresses Here ::::
PC101 192.168.1.101 11-11-11-11-11-11 101号机
PC102 192.168.1.102 22-22-22-22-22-22 102号机
PC103 192.168.1.103 33-33-33-33-33-33 103号机

复制代码

修改上面的掩码、网关等数据，并按照下面三行格式配置好参数，MAC地址务必正确，运行程序后就会匹配MAC地址然后自动修改计算机名、IP地址、计算机描述，最后清理自身，重启电脑。

孟仁飞 · 发表于昨天 10:15

学习

fruds9981 · 发表于昨天 10:21

标记以方便后续学习

yyz2191958 · 发表于昨天 12:14

yxldh 发表于 2024-11-4 09:54
楼主想要的是这种吗？

助人为乐

yyz2191958 · 发表于昨天 12:15

holley2008 发表于 2024-11-4 08:56
现在都很少动脑子，先用ai来一遍

助人为乐

wang1126 · 发表于昨天 13:01

谢谢3、4楼分享

熊哥 · 发表于昨天 14:29

标记学习

szwp · 发表于昨天 15:42

机房一般不进去，服务器也不太换

therfer · 发表于 5 小时前

yxldh 发表于 2024-11-4 09:54
楼主想要的是这种吗？

C:\Users\Administrator\Desktop\1.bmp

therfer · 发表于 1 小时前

yyz2191958 发表于 2024-11-4 12:14
助人为乐

win10 不ok win7 ok 不知哪里的问题

		自动登录	找回密码
密码			注册

[求助] 求一个批处理机房ip通过mac 自动换

点评

评分

点评

评分

点评