11号楼辅助设置.bat

11号楼辅助设置.bat
减轻为设置IP而输入一大堆数字的批处理。另附赠了一些如设置计算机名、简单优化服务、停用系统自带的管理员帐号（Administrator）等一系类方便“菜鸟”用户的贴心功能。

20080321更新：添加了“设置计算机名”的功能，细节调整。
20080427更新：增强了“辅助设置IP地址”的功能，可以支持任何语种的WinXP并加入了多网卡选择功能。

@ECHOOFF
setlocalEnableDelayedExpansion
title11号楼辅助设置.bat
remAuthor:Tunhsia<tunhsiaATgmail.com>,Update@20080427
:::::::::::::::::::::::::::主菜单:::::::::::::::::::::::
:MENU
COLOR8A
CLS
ECHO.
ECHO.
ECHO.
ECHO."11号楼辅助设置.bat"欢迎您的使用！
echo.（适用于各语种WinXP）
ECHO.
ECHO.主菜单：
ECHO.【1】辅助设置IP地址（仅适用于11号楼）；
ECHO.【2】添加一个自动登陆管理员并停用默认；
ECHO.【3】简单优化服务以提升速度及加固安全；
ECHO.【4】更改异常启动时磁盘错误检查等待时间；
ECHO.【5】更改注册组织名、用户名与计算机名；
ECHO.【a】关于此程序；
ECHO.【q】退出。
ECHO.
setop=""
set/pop=请选择服务项目的数字号并回车[12345]：
if"%op%"=="1"(
goto:op1
)elseif"%op%"=="2"(
goto:op2
)elseif"%op%"=="3"(
goto:op3
)elseif"%op%"=="4"(
goto:op4
)elseif"%op%"=="5"(
goto:op5
)elseif"%op%"=="a"(
gotoabout
)elseif"%op%"=="q"(
goto:quit
)else(
goto:error
)
::::::::::::::::::::::::空输入处理:::::::::::::::::::::::
:error
cls
COLOR8C
ECHO.
ECHO.
echo您的输入有误，请输入1～5中的一个数字后回车！
echo请按任意键返回主菜单!
pause>nul
goto:MENU

::::::::::::::::::::::设置IP:::::::::::::::::::::::::::
:op1
setadaptercount=0
setadapterlist=
for/f"usebackqtokens=1delims=:"%%iin(`ipconfig/all^|find^"Ethernetadapter^"`)do(
set/aadaptercount+=1
setadaptername=%%i
setadapter!adaptercount!=!adaptername:~17!
setadapterlist=!adapterlist!!adaptercount!,!adaptername:~17!^&echo.
)

seti=Tunhsia
if%adaptercount%equ1(
seti=1
goto:CHOOSEADAPTERCOMPLETED
)elseif%adaptercount%equ0(
echo未发现可以配制的设备！请检查网卡是否被禁用。
ping127.1>nul
goto:MENU
)
echo.&echo与该计算机相连的所有以太网卡列表如下
echo%adapterlist%
:CHOOSEADAPTERAGAIN
set/pi=请键入待配制网卡的数字序号：
if%i%geq1(ifnot%i%leq%adaptercount%goto:CHOOSEADAPTERAGAIN)elsegoto:CHOOSEADAPTERAGAIN
:CHOOSEADAPTERCOMPLETED
setadapter=!adapter%i%!

seti=Tunhsia
:INPUTIPAGAIN
set/pi=请输入您IP的最后一部分（如果您的IP地址是222.25.90.x,输入x即可）：
if%i%geq1(ifnot%i%leq254goto:INPUTIPAGAIN)elsegoto:INPUTIPAGAIN
echo正在设置IP、子网掩码与网关…
netshinterfaceipsetaddressname="%adapter%"source=staticaddr=222.25.90.%i%mask=255.255.255.0gateway=222.25.90.254gwmetric=none
echo正在设置首选DNS服务器…
netshinterfaceipsetdnsname="%adapter%"source=staticaddr=218.244.0.19
echo正在设置备用DNS服务器…
netshinterfaceipadddnsname="%adapter%"addr=61.134.1.4index=2
goto:judge

:::::::::::::::::::::添加用户:::::::::::::::::::::::::
:op2
setuser=
set/puser=请输入用户名（空输入将取消自动登陆）：
if"%user%"==""(
echo正在取消自动登陆…
echoy|regadd"HKLM/SOFTWARE/Microsoft/WindowsNT/CurrentVersion/Winlogon"/v"AutoAdminLogon"/treg_sz/d"0"
goto:judge
)
set/ppass=请输入密码：
echo正在添加自动登陆管理员…
netuser"%user%""%pass%"/add/comment:"这是一个具有管理员权限的自动登陆帐号。"/fullname:"%user%"
netlocalgroupadministrators"%user%"/add
echoy|regadd"HKLM/SOFTWARE/Microsoft/WindowsNT/CurrentVersion/Winlogon"/v"AutoAdminLogon"/treg_sz/d"1"
echoy|regadd"HKLM/SOFTWARE/Microsoft/WindowsNT/CurrentVersion/Winlogon"/v"DefaultUserName"/treg_sz/d"%user%"
echoy|regadd"HKLM/SOFTWARE/Microsoft/WindowsNT/CurrentVersion/Winlogon"/v"DefaultPassword"/treg_sz/d"%pass%"
echo正在停用系统自带的管理员用户…
netuserAdministrator/active:no
gotojudge

::::::::::::::::::优化服务::::::::::::::::::::::::
:op3
echo正在优化服务…
netstop"ErrorReportingService"
scconfigERSvcstart=Disabled
netstop"RemoteRegistry"
scconfigRemoteRegistrystart=Disabled
netstop"SecurityCenter"
scconfigwscsvcstart=Disabled
netstop"TaskScheduler"
scconfigSchedulestart=Disabled
netstop"WindowsTime"
scconfigW32Timestart=Disabled
goto:judge

::::::::::::更改异常启动时磁盘错误检查等待时间:::::::
:op4
setAutoChkTimeOut=
set/pAutoChkTimeOut=请输入新的等待时间（默认10秒，建议改为3，空输入将设为0）：
echo正在更改异常启动时磁盘错误检查等待时间…
echoy|regadd"HKLM/SYSTEM/ControlSet001/Control/SessionManager"/v"AutoChkTimeOut"/tREG_DWORD/d"%AutoChkTimeOut%"
goto:judge

::::::::::::更改注册组织名与用户名:::::::::::::::
:op5
setRegisteredOrganization=Tunhsia&setRegisteredOwner=Tunhsia&setComputerName=Tunhsia
set/pRegisteredOrganization=请输入新的注册组织名：
set/pRegisteredOwner=请输入新的注册用户名：
set/pComputerName=请输入新的计算机名：
echo正在更改注册组织名、用户名与计算机名…
echoy|regadd"HKLM/SOFTWARE/Microsoft/WindowsNT/CurrentVersion"/v"RegisteredOrganization"/treg_sz/d"%RegisteredOrganization%"
echoy|regadd"HKLM/SOFTWARE/Microsoft/WindowsNT/CurrentVersion"/v"RegisteredOwner"/treg_sz/d"%RegisteredOwner%"
echoy|regadd"HKLM/SYSTEM/ControlSet001/Control/ComputerName/ActiveComputerName"/v"ComputerName"/treg_sz/d"%ComputerName%"
echoy|regadd"HKLM/SYSTEM/ControlSet001/Control/ComputerName/ComputerName"/v"ComputerName"/treg_sz/d"%ComputerName%"
echoy|regadd"HKLM/SYSTEM/ControlSet001/Services/Tcpip/Parameters"/v"NVHostname"/treg_sz/d"%ComputerName%"
echoy|regadd"HKLM/SYSTEM/ControlSet001/Services/Tcpip/Parameters"/v"Hostname"/treg_sz/d"%ComputerName%"
goto:judge

::::::::::::::::::::::::::关于::::::::::::::::::
:about
cls
echo.
echo.
echo★★★★★★★★★★★★★★★★★★★★★★★★★★★
echo★关于★
echo.★★
echo★如有任何建议或Bug请Email至：liaodunxia@gmail.com★
echo.★★
echo★★
echo★★★★★★★★★★★★★★★★★★★★★★★★★★★
echo.
echo.
setwebsite=欢迎访问我的博客：http://blog.csdn.net/t0nsha/
for/l%%iin(0,1,50)docall:website1%%i
if%a%equ50goto:MENU
:website1
set/aa=%1
set/p=!website:~%a%,1!<nul
ping/n1127.1>nul
goto:eof

:::::::::::::::::::::::::退出::::::::::::::::::
:quit
cls
echo.
echo.
echo.
echo－－－－－－－－－－
echo§谢谢使用！再见！§
echo－－－－－－－－－－
ping-n1127.1>nul&exit

::::::::::::::::::::::::judge:::::::::::::::::::::
:judge
iferrorlevel0ifnoterrorlevel1goto:success
goto:failure

:success
cls
color8E
ECHO.
ECHO.
echo恭喜，设置成功！按任意键返回主菜单。
pause>nul
goto:MENU

:failure
cls
COLOR8C
ECHO.
ECHO.
echoSorry，设置失败，请重试！按任意键返回主菜单。
pause>nul
goto:MENU

::::::::::::::::::::::THEEND::::::::::::::::::::::