挺好用的自动改名加域工具

MAIN.bat 中的内容

@echo OFF

cls

title 歡迎使用FIS加域軟件加入FIS域...

:menu

cls

color 0A

echo.

echo ===================================================== echo ******** 請輸入您即將進行的操作******** echo ===================================================== echo.

echo 1.分配計算機名稱加入FIS域

echo.

echo 2.將計算機退出FIS域

echo.

echo 3.添加本地工作組

echo.

echo 4.修改用戶密碼

echo.

echo 5.一鍵清除系統垃圾

echo.

echo 6.修改計算機主頁

echo.

echo 7.添加IE信任站點、設置安全選項

echo.

echo Q.退出

echo.

echo.

:cho

set choice=

set /p choice= 請輸入:

IF NOT "%choice%"=="" SET choice=%choice:~0,1%

if /i "%choice%"=="1" goto changeName

if /i "%choice%"=="2" goto UNJOINDOMAIN

if /i "%choice%"=="3" goto AddGROUP if /i "%choice%"=="4" goto INI

if /i "%choice%"=="5" goto clearall

if /i "%choice%"=="6" goto changeindex if /i "%choice%"=="7" goto changeietest if /i "%choice%"=="Q" goto endd

echo 輸入有誤,請重新輸入

echo.

goto cho

:changeName

CALL changeName.bat

pause

GOTO menu

::SHUTDOWN -t 0 -r

:UNJOINDOMAIN

CALL UNJOINDOMAIN.BAT

GOTO menu

:AddGROUP

CALL AddGROUP.BAT

GOTO menu

:INI

CALL changepasswd.bat

GOTO menu

:clearall

CALL clear.bat

GOTO menu

:changeindex

CALL changeindex.bat

goto menu

:changeietest

:changeindex

CALL changeietest.bat

goto menu

:end

PAUSE

Changename.bat

ECHO ECHO 計算機名稱:%NEWNAME% >> C:\FA1Fnamelist1.bat

ECHO @ECHO OFF >> C:\FA1Fnamelist1.bat

ECHO %NEWNAME%> C:\FA1Fnamelist1.txt

ECHO %NEWNAME% >> Z:\FA1FnamelistALL.txt

COPY C:\FA1Fnamelist1.txt Z:\FA1Fnamelist.txt

NET USE * /D /Y

cls

ECHO 請您記下為您分配的計算機名稱

::ECHO 此名稱需要在修改計算機名時手動輸入

CALL C:\FA1Fnamelist1.bat

color 0A

cscript.exe //nologo fis.vbs "%NEWNAME%"

GOTO END

:SA1F

net use * /d /y

net use z: \\192.168.0.2\computerList test+123 /user:test

copy z:\SA1Fnamelist.txt c:\

for /f "tokens=3,4 delims=_" %%i in (c:\SA1Fnamelist.txt) do set localIP=%%i ECHO %localIP%

SET var= %localIP%

SET /a var+=1

ECHO %var%

SET NEWNAME=ICC_SA1_%var%

ECHO @ECHO ON > C:\SA1Fnamelist1.bat

ECHO color 0C > C:\SA1Fnamelist1.bat

ECHO ECHO 計算機名稱:%NEWNAME% >> C:\SA1Fnamelist1.bat

ECHO @ECHO OFF >> C:\SA1Fnamelist1.bat

ECHO %NEWNAME%> C:\SA1Fnamelist1.txt

ECHO %NEWNAME% >> Z:\SA1FnamelistALL.txt

COPY C:\SA1Fnamelist1.txt Z:\SA1Fnamelist.txt

NET USE * /D /Y

CLS

ECHO 請您記下為您分配的計算機名稱

::ECHO 此名稱需要在修改計算機名時手動輸入

CALL C:\SA1Fnamelist1.bat

ECHO OFF

color 0A

cscript.exe //nologo fis.vbs "%NEWNAME%"

GOTO END

:FA2F

net use * /d /y

net use z: \\192.168.0.2\computerList test+123 /user:test

copy z:\FA2Fnamelist.txt c:\

for /f "tokens=3,4 delims=_" %%i in (c:\FA2Fnamelist.txt) do set localIP=%%i ECHO %localIP%

SET var= %localIP%

SET /a var+=1

ECHO %var%

SET NEWNAME=ICC_FA2_%var%

ECHO @ECHO ON > C:\FA2Fnamelist1.bat

ECHO color 0C > C:\FA2Fnamelist1.bat

ECHO ECHO 計算機名稱:%NEWNAME% >> C:\FA2Fnamelist1.bat

ECHO @ECHO OFF >> C:\FA2Fnamelist1.bat

ECHO %NEWNAME%> C:\FA2Fnamelist1.txt

ECHO %NEWNAME% >> Z:\FA2FnamelistALL.txt