复制代码
- @echo off
- title 小程序 Ver 1.0 【 Design:musicbug 】
- mode con: cols=64 lines=26 & color 9f
- :loop
- CLS
- @echo.
- @echo ※※※※※※※※※※※※※※※※※※※※※※※※※※※※
- @echo ※ ※
- @echo ※ 本程序将为您设置计算机名和本地连接IP地址 ※
- @echo ※ ※
- @echo ※ ※
- @echo ※ 「1」- 设置计算机名称 ※
- @echo ※ ※
- @echo ※ 「2」- 手动设置本地连接 IP 和 DNS ※
- @echo ※ ※
- @echo ※ 「3」- 自动获取 IP 和 DNS ※
- @echo ※ ※
- @echo ※ 「4」- 退出程序 ※
- @echo ※ ※
- @echo ※※※※※※※※※※※※※※※※※※※※※※※※※※※※
- @echo.
- @echo ******请选择设置方式 [1,2,3,4],并按回车确定执行******
- @echo.
- @echo.
- @echo.
- @echo.
- @echo.
- @echo.
- @echo.
- @ SET /P ST="请输入序号:"
- echo.
- if /I "%ST%"=="1" goto setup1
- if /I "%ST%"=="2" goto setup2
- if /I "%ST%"=="3" goto setup3
- if /I "%ST%"=="4" exit
- goto loop
- :setup1
- cls
- @echo.
- @echo ******即将修改计算机名,输入完成请回车确定******
- @echo.
- @echo.
- set /p pcname="请输入计算机名:"
- reg add "HKEY_LOCAL_MACHINE\System\CurrentControlSet\Control\ComputerName\ActiveComputerName" /v ComputerName /t reg_sz /d %pcname% /f >nul 2>nul
- reg add "HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\Tcpip\Parameters" /v "NV Hostname" /t reg_sz /d %pcname% /f >nul 2>nul
- reg add "HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\Tcpip\Parameters" /v Hostname /t reg_sz /d %pcname% /f >nul 2>nul
- reg add "HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\lanmanserver\Parameters" /v srvcomment /t reg_sz /d %pcname% /f >nul 2>nul
- cls
- set a=^set /p=■%b%^<nul^&ping/n 0 127.1^>nul^&
- echo.
- set/p= <nul&%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%
- echo 100%%
- @echo.
- @echo.
- @echo.
- @echo.
- @echo.
- @echo ---------------------------------------------
- @echo 成功将计算机名设置为:%pcname%
- @echo ---------------------------------------------
- @echo.
- @echo.
- @echo.
- @echo.
- @echo.
- @echo.
- @echo.
- @echo.
- @echo.
- @echo.
- @echo.
- @echo.
- @echo.
- @echo.
- @ pause
- goto loop
- :setup2
- cls
- @echo.
- @echo ******手动设置本地连接IP地址,输入完成请回车确定******
- @echo.
- @echo.
- set /p add="请输入 IP 地址:"
- @echo.
- set /p mask="请输入子网掩码:"
- @echo.
- set /p gw="请输入默认网关:"
- @echo.
- set /p DNS1="请输入首选 DNS:"
- @echo.
- set /p DNS2="请输入备用 DNS:"
- netsh interface ip set address name="本地连接" source="static" addr="%add%" mask="%mask%" gateway="%gw%" >nul 2>nul
- netsh interface ip add dns name="本地连接" addr=%DNS1% register=primary >nul 2>nul
- netsh interface ip add dns name="本地连接" addr=%DNS2% index=2 >nul 2>nul
- ipconfig /flushdns >nul 2>nul
- cls
- set a=^set /p=■%b%^<nul^&ping/n 0 127.1^>nul^&
- echo.
- set/p= <nul&%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%
- echo 100%%
- @echo.
- @echo.
- @echo.
- @echo.
- @echo.
- @echo -------------------------------------
- @echo 成功设置本地连接IP地址和DNS
- @echo.
- @echo 当前 IP 地址:%add%
- @echo 当前子网掩码:%mask%
- @echo 当前默认网关:%gw%
- @echo 当前首选 DNS:%DNS1%
- @echo 当前备用 DNS:%DNS2%
- @echo -------------------------------------
- @echo.
- @echo.
- @echo.
- @echo.
- @echo.
- @echo.
- @echo.
- @echo.
- @ pause
- goto loop
- :setup3
- cls
- netsh interface ip set address name = "本地连接" source = dhcp >nul 2>nul
- netsh interface ip set dns name = "本地连接" source = dhcp >nul 2>nul
- ipconfig /flushdns >nul 2>nul
- cls
- set a=^set /p=■%b%^<nul^&ping/n 0 127.1^>nul^&
- echo.
- set/p= <nul&%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%
- echo 100%%
- @echo.
- @echo.
- @echo.
- @echo.
- @echo.
- @echo -------------------------------------
- @echo 成功设置本地连接自动获取IP地址和DNS
- @echo -------------------------------------
- @echo.
- @echo.
- @echo.
- @echo.
- @echo.
- @echo.
- @echo.
- @echo.
- @echo.
- @echo.
- @echo.
- @echo.
- @echo.
- @echo.
- @ pause
- goto loop
欢迎光临 批处理之家 (http://www.bathome.net/) | Powered by Discuz! 7.2 |