批处理快速改IP地址及计算机名
复制下面全部代码保存为.bat批处理即可：@echo off
>nul 2>&1 "%SYSTEMROOT%\system32\cacls.exe" "%SYSTEMROOT%\system32\config\system"
if '%errorlevel%' NEQ '0' (
echo 请求管理员权限...
goto UACPrompt
) else ( goto gotAdmin )
:UACPrompt
echo Set UAC = CreateObject^("Shell.Application"^) > "%temp%\getadmin.vbs"
echo UAC.ShellExecute "%~s0", "", "", "runas", 1 >> "%temp%\getadmin.vbs"
"%temp%\getadmin.vbs"
exit /B
:gotAdmin
:
@echo off & setlocal enabledelayedexpansion
color 2e
title=新机快速设置向导v0.2 By:PurSun
echo.==================================
echo.= 欢迎使用新机快速设置向导v0.2 =
echo.= By:PurSun =
echo.==================================
echo.本程序用于快速设置IPv4协议及计算机名
echo —————————————————
echo. 正在抓取网卡名称……
set m=0
for /f "tokens=1* delims=," %%a in ('Getmac /v /nh /fo csv') do (
set /a m+=1
set "name!m!=%%a"
set "name=%name:~1,-1%"
)
:Select_Card
echo. & echo 1:!name1! & echo 2:!name2! & echo 3:!name3! & echo 4:!name4! & echo 5:!name5! & echo.
set /p "Select_Card=选择网卡[显示五张]:"
if "%Select_Card%" == "1" ( set card=!name1! ) else (
if "%Select_Card%" == "2" ( set card=!name2! ) else (
if "%Select_Card%" == "3" ( set card=!name3! ) else (
if "%Select_Card%" == "4" ( set card=!name4! ) else (
if "%Select_Card%" == "5" ( set card=!name5! ) else ( echo. & echo 未键入任何参数! & pause>nul & cls & goto :Select_Card )))))
echo —————————————————
set /p home=请输入IP地址第三段:192.168.
echo —————————————————
set /p ip=请输入IP地址第四段:192.168.%home%.
echo —————————————————
set /p jfh=请输入计算机名前缀:
echo —————————————————
set ipaddress=192.168.%home%.%ip%
set mask=255.255.255.0
set gateway=192.168.%home%.254
set dns=119.29.29.29
set it=%jfh%%ip%
echo 即将设置以下信息
echo 网卡名称 IP地址 子网掩码 默认网关 首选DNS 计算机名
echo %card% %ipaddress% %mask% %gateway% %dns% %it%
echo —————————————————
pause
echo 正在设置IPv4信息......
netsh interface ip set address name=%card% source=static addr=%ipaddress% mask=%mask% gateway=%gateway% 1
echo 正在设置DNS信息......
netsh interface ip set dns name=%card% source=static addr=%dns%
echo 正在修改计算机名......
reg add "HKEY_LOCAL_MACHINE\System\CurrentControlSet\Control\ComputerName\ActiveComputerName" /v ComputerName /t reg_sz /d %it% /f >nul 2>nul
reg add "HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\Tcpip\Parameters" /v "NV Hostname" /t reg_sz /d %it% /f >nul 2>nul
reg add "HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\Tcpip\Parameters" /v Hostname /t reg_sz /d %it% /f >nul 2>nul
netsh interface ip show config name=%card%
echo 您当前的计算机名为 %COMPUTERNAME%
echo 程序执行完毕
pause
由于本人管机房滴，交换机没有dhcp服务只能手动设置IP地址，无奈百度好久才收集了这一套批处理。
该批处理支持：
1.自动获取管理员权限
2.自定义选择网卡(当前写法只显示5张，可自行DIY)
目前该批处理改完计算机名后批处理里的新计算机名需要重启后才能获取到。
干货！！！！
膜拜 能否麻烦楼主将代码以代码模式发出，有些代码被转义成表情符号了 修改IP很方便 批处理显示的画面是什么样的？ 谢谢分享！学习了。 感谢分享 谢谢分享！学习了。 干货。。。
页:
[1]