@echo off&setlocal enabledelayedexpansion
:main
title 計(jì)算機(jī)用戶控制系統(tǒng)&color 0a&mode con cols=80 lines=30
cls
echo,
echo,
echo,
echo,
echo 請選擇你需要的功能
echo================================================================================
echo,
echo 1.查詢計(jì)算機(jī)當(dāng)前所有用戶 
echo 2.為計(jì)算機(jī)添加用戶
echo 3.刪除計(jì)算機(jī)用戶
echo 4.更改用戶密碼
echo 5.刪除用戶密碼
echo 6.查看當(dāng)前用戶組
echo 7.為計(jì)算機(jī)添加用戶組
echo 8.刪除計(jì)算機(jī)用戶組
echo 9.更改用戶的用戶組
echo 10.退出請按q
echo,
echo本程序任意處空格返回主菜單
echo ===============================================================================
echo --jakorzhang 制作
goto start
:ushd
cls
echo,
echo,
echo ===============================================================================
echo 當(dāng)前的用戶有：
net user
echo,
echo本程序任意處空格返回主菜單
echo ===============================================================================
echo,
goto :eof
:lghd
cls
echo,
echo,
echo ===============================================================================
echo 當(dāng)前的用戶組有：
net localgroup
echo,
echo本程序任意處空格返回主菜單
echo ===============================================================================
echo,
goto :eof
:9hd
cls
echo,
echo ===============================================================================
echo 當(dāng)前的用戶有：
net user
echo ===============================================================================
echo 當(dāng)前的用戶組有：
net localgroup
echo,
echo本程序任意處空格返回主菜單
echo ===============================================================================
echo,
echo,
goto :eof
:scd
set /p choice=您好！操作成功！是否再次操作該功能？(y/n)
if %choice%==y (
goto %now%
) else (
goto main
)
goto :eof
:rt
if %name%==  goto main
goto :eof
:start
set /p choice=請選擇功能：
if %choice%==1 goto 1
if %choice%==2 goto 2
if %choice%==3 goto 3
if %choice%==4 goto 4
if %choice%==5 goto 5
if %choice%==6 goto 6
if %choice%==7 goto 7
if %choice%==8 goto 8
if %choice%==9 goto 9
if %choice%==q (
goto 10
) else (
goto main
)
:1
set now=1
call :ushd
echo 任意鍵返回主菜單&pause>nul
goto main
:2
set now=2
call :ushd
set /p name=請輸入將要添加的用戶名：
call :rt
:sp
set /p pw=請?jiān)O(shè)定該用戶的最新密碼（回車將不設(shè)置密碼）：
if %pw%==  goto main
set /p rpw=請確認(rèn)該用戶的最新密碼（回車跳過）：
if %rpw%==  goto main
if %pw%==%rpw% (
echo 驗(yàn)證成功！正在執(zhí)行...
goto %now%cmd
) else (
echo 密碼輸入不一致請重新輸入！&pause>nul
goto sp
)
goto :eof
:2cmd
net user %name% %pw% /add>nul
if errorlevel 2 (
set /p name=該用戶已存在，請查實(shí)后重新輸入!:
call :rt
goto 2cmd
)
if errorlevel 1 (
set /p name=請輸入正確格式的用戶名，以數(shù)字和字母為內(nèi)容!:
call :rt
goto 2cmd
) else (
call :scd
)
pause
:3
set now=3
call :ushd
echo,
set /p name=請輸入要刪除的用戶名：
call :rt
:3cmd
net user %name% /del>nul
if errorlevel 2 (
set /p name=該用戶不存在或者無法刪除用戶請重新輸入：
call :rt
goto 3cmd
)
if errorlevel 1 (
set /p name=輸入有錯誤，請重新輸入：
call :rt
goto 3cmd
) else (
call :scd
)
:4
set now=4
call :ushd
set /p name=請輸入需要修改密碼的用戶：
call :rt
call :sp
:4cmd
net user %name% %pw% >nul
if errorlevel 1 (
set /p name=用戶名輸入錯誤請重新輸入！密碼默認(rèn)為剛才輸入內(nèi)容：
call :rt
goto 4cmd
) else (
call :scd
)
:5
set now=5
call :ushd
set /p name=請輸入要刪除密碼的用戶名：
call :rt
:5cmd
echo,&echo,|net user %name% *>nul
if errorlevel 1 (
set /p name=用戶名錯誤，請重新輸入：
call :rt
goto 5cmd
) else (
call :scd
)
:6
call :lghd
echo 任意鍵返回主菜單&pause>nul
goto main
:7
set now=7
call :lghd
set /p name=請輸入將要添加的用戶組名：
call :rt
:7cmd
net localgroup %name% /add>nul
if errorlevel 2 (
set /p name=該用戶組已存在，請查實(shí)后重新輸入!:
call :rt
goto 7cmd
)
if errorlevel 1 (
set /p name=請輸入正確格式的用戶組名，以數(shù)字和字母為內(nèi)容!:
call :rt
goto 7cmd
) else (
call :scd
)
:8
set now=8
call :lghd
echo,
set /p name=請輸入要刪除的用戶組名：
call :rt
:8cmd
net localgroup %name% /del>nul
if errorlevel 2 (
set /p name=該用戶組不存在或者無法刪除用戶組請重新輸入：
cal :rt
goto 8cmd
)
if errorlevel 1 (
set /p name=輸入有錯誤，請重新輸入：
call :rt
goto 8cmd
) else (
call :scd
)
@echo off
:92cmd
net localgroup %group% %name% /del
goto check
goto :eof
:scd
set /p choice=您好！操作成功！是否再次操作該功能？(y/n)
if %choice%==y (
goto %now%
) else (
goto main
)
goto :eof
:9
set now=9&mode con cols=80 lines=60
call :9hd
echo1.添加用戶到組
echo2.刪除用戶所在組
set /p choice=請選擇：
if %choice%==  goto main
if %choice%==1 goto 91
if %choice%==2 (
goto 92
) else (
echo 輸入錯誤請重新輸入！&pause>nul
goto 9
)
:91
set /p name=請輸入想要更改的用戶名：
if %name%==  goto main
set /p group=請輸入想要更改的組：
if %group%==  goto main
:91cmd
net localgroup %group% %name% /add
if errorlevel 2 (
set /p group=輸入的組名稱錯誤或該用戶已經(jīng)存在于該組，請重新檢查輸入:
if %group%==  goto main
goto 91cmd
)
if errorlevel 1 (
set /p name=用戶名輸入錯誤，或已有該用戶。請重新檢查輸入：
call :rt
goto 91cmd
) else (
call :scd
)
:92
set /p name=請輸入想要更改的用戶名：
if %name%==  goto main
set /p group=請輸入想要更改的組：
if %group%==  goto main
:92cmd
net localgroup %group% %name% /del
if errorlevel 2 (
set /p group=輸入的組名稱錯誤或該用戶已經(jīng)存在于該組，請重新檢查輸入:
if %group%==  goto main
goto 92cmd
)
if errorlevel 1 (
set /p name=用戶名輸入錯誤，或已有該用戶。請重新檢查輸入：
call :rt
goto 92cmd
) else (
call :scd
)
:10
exit
nclick="copycode($('code0'));">復(fù)制代碼