ChangePassword 16.03.2014

Foxik · 17 Мар 2014

В Windows 7 учетная запись Администратор не активна, по умолчанию. Там создается пользователь с правами администратора. И многие ставят пароль просто от детей и т.д. и т.п. И если диск не создан, то кроме смены пароля, ни чего не остается.

Foxik · 19 Фев 2016

немного дополнил...

CMD/BATCH:

@echo off
rem  *****************************************************
rem Description: Change Password User Accounts in Windows
rem Copyright: Foxik
rem Create: 2016
rem  *****************************************************
color 1f
Echo  ЙНННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННН»
Echo  є                                                                            є
Echo  є                  Change Password User Accounts in Windows                  є
Echo  є             ‘¬Ґ  Ї а®«п гзҐвле § ЇЁбҐ© Ї®«м§®ў вҐ«Ґ© Windows             є
Echo  є                                                                            є
Echo  ИННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННј

set DiskRoot=
set count=0
for %%D in (C D E F G H I J K L M N O P Q R S T U V W X Y Z) do (
if exist %%D:\Windows\system32\config\SYSTEM (
if %%D: NEQ %systemdrive% (
set DiskRoot=%%D:
set /a count+=1
)
)
)
If %count% == 0 goto DISK0
If %count% == 1 goto DISK1

echo Ќ ©¤Ґ® Ў®«ҐҐ ®¤®Ј® а §¤Ґ«  б Windows
echo —в®Ўл ўлЎа вм а §¤Ґ« - ўўҐ¤ЁвҐ ЎгЄўг ¤ЁбЄ , ў д®а¬ вҐ C:
set /p %DiskRoot%= ‚ўҐ¤ЁвҐ ЎгЄўг а §¤Ґ« :
set FilePath=%DiskRoot%\windows\system32\config\system
goto NEXT

:DISK0
Echo ЌҐ г¤ «®бм  ©вЁ а §¤Ґ« б Windows.
Echo ЌҐ®Ўе®¤Ё¬ д Ё« Disk:\windows\system32\config\system
set /p %FilePath%=‚ўҐ¤ЁвҐ Їгвм Є д Ё«г:
if "%FilePath%" == "" (Echo Џгвм Ґ гЄ § !!! & goto end)
set %DiskRoot%=%FilePath:~0,2%
goto NEXT

:DISK1
Echo “¤ «®бм  ©вЁ а §¤Ґ« б Windows   ¤ЁбЄҐ %DiskRoot%.
Echo —в®Ўл ўлЎа вм ¤агЈ®© а §¤Ґ« - ўўҐ¤ЁвҐ ЎгЄўг ¤ЁбЄ , ў д®а¬ вҐ C:
set /p %DiskRoot%= —в®Ўл ўлЎа вм %DiskRoot%,  ¦¬ЁвҐ Enter:
set FilePath=%DiskRoot%\windows\system32\config\system

:NEXT
Echo.
Echo ‚лЎа  ¤ЁбЄ %DiskRoot%
if not exist %FilePath% (Echo File not found & goto end)
Echo ” Ё« %FilePath%  ©¤Ґ.
Echo.

reg load HKLM\111 %FilePath%
reg add HKLM\111\Setup /v CmdLine /t REG_SZ /d "cmd.exe /k "%%systemdrive%%"\pass.cmd" /f
reg add HKLM\111\Setup /v SetupType /t REG_DWORD /d 2 /f

ECHO @echo off>%DiskRoot%\pass.cmd
ECHO color 1f>>%DiskRoot%\pass.cmd
ECHO set chs=MENU>>%DiskRoot%\pass.cmd
ECHO set $x=0>>%DiskRoot%\pass.cmd
ECHO :LABLE>>%DiskRoot%\pass.cmd
ECHO Echo  ЙНННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННН»>>%DiskRoot%\pass.cmd
ECHO Echo  є                                                                            є>>%DiskRoot%\pass.cmd
ECHO Echo  є                  Change Password User Accounts in Windows                  є>>%DiskRoot%\pass.cmd
ECHO Echo  є             ‘¬Ґ  Ї а®«п гзҐвле § ЇЁбҐ© Ї®«м§®ў вҐ«Ґ© Windows             є>>%DiskRoot%\pass.cmd
ECHO Echo  є                                                                            є>>%DiskRoot%\pass.cmd
ECHO Echo  ИННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННј>>%DiskRoot%\pass.cmd
ECHO Echo.>>%DiskRoot%\pass.cmd
ECHO goto %chs%>>%DiskRoot%\pass.cmd
ECHO :MENU>>%DiskRoot%\pass.cmd
ECHO echo  НННННННННННННННННННННННННННННН Ћб®ў®Ґ ¬Ґо НННННННННННННННННННННННННННННННН>>%DiskRoot%\pass.cmd
ECHO echo. >>%DiskRoot%\pass.cmd
ECHO echo     1. ‘¬Ґ  Ї а®«п гзҐв®© § ЇЁбЁ>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO echo     2. ‘®§¤ ЁҐ гзҐв®© § ЇЁбЁ>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO echo     3. “¤ «ҐЁҐ гзҐв®© § ЇЁбЁ>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO echo     4. ‘Єалвм гзҐвго § ЇЁбм>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO echo     5. Ћв®Ўа®§Ёвм гзҐвго § ЇЁбм>>%DiskRoot%\pass.cmd
ECHO echo. & echo.>>%DiskRoot%\pass.cmd
ECHO echo         0. ‚ле®¤>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO echo  ННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННН>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO Choice /C 123450 /M "‚лЎҐаЁвҐ ЇгЄв:">>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO if %errorlevel%==6 cls & goto END>>%DiskRoot%\pass.cmd
ECHO if %errorlevel%==1 cls & set chs=LIST & set $x=1 & goto LABLE>>%DiskRoot%\pass.cmd
ECHO if %errorlevel%==2 cls & set chs=4 & set $x=0 & goto LABLE>>%DiskRoot%\pass.cmd
ECHO if %errorlevel%==3 cls & set chs=LIST & set $x=3 & goto LABLE>>%DiskRoot%\pass.cmd
ECHO if %errorlevel%==4 cls & set chs=LIST & set $x=5 & goto LABLE>>%DiskRoot%\pass.cmd
ECHO if %errorlevel%==5 cls & set chs=6 & set $x=0 & goto LABLE>>%DiskRoot%\pass.cmd
ECHO :LIST>>%DiskRoot%\pass.cmd
ECHO Echo.         ‘ЇЁб®Є «®Є «мле Ї®«м§®ў вҐ«Ґ© (List of local user accounts): >>%DiskRoot%\pass.cmd
ECHO Setlocal EnableExtensions EnableDelayedExpansion >>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO echo  ЂЄвЁўлҐ гзҐвлҐ § ЇЁбЁ (Active users accaunts)НННННННННННННННННННННННННННННН>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO for /f "usebackq tokens=2 delims==" %%a in (`WMIC UserAccount Where "LocalAccount=True And Disabled=False" Get Name /Format:List`) do (>>%DiskRoot%\pass.cmd
ECHO set /a cnt+=1>>%DiskRoot%\pass.cmd
ECHO set "47=%%a">>%DiskRoot%\pass.cmd
ECHO set summ=48>>%DiskRoot%\pass.cmd
ECHO set "group=       ">>%DiskRoot%\pass.cmd
ECHO net localgroup Ђ¤¬ЁЁбва в®ал | findstr /i %%a > nul>>%DiskRoot%\pass.cmd
ECHO if not errorlevel 1 set "group=admin  ">>%DiskRoot%\pass.cmd
ECHO ECHO.   52. %%a>>%DiskRoot%\pass.cmd
ECHO )>>%DiskRoot%\pass.cmd
ECHO set na=54>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO echo  ЌҐ ЄвЁўлҐ гзҐвлҐ § ЇЁбЁ(Disabled users accaunts)ННННННННННННННННННННННННННН>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO for /f "usebackq tokens=2 delims==" %%a in (`WMIC UserAccount Where "LocalAccount=True And Disabled=True" Get Name /Format:List`) do (>>%DiskRoot%\pass.cmd
ECHO set /a cnt+=1>>%DiskRoot%\pass.cmd
ECHO set "60=%%a">>%DiskRoot%\pass.cmd
ECHO set "summ=61">>%DiskRoot%\pass.cmd
ECHO set "group=       ">>%DiskRoot%\pass.cmd
ECHO net localgroup Ђ¤¬ЁЁбва в®ал | findstr /i %%a > nul>>%DiskRoot%\pass.cmd
ECHO if not errorlevel 1 set "group=admin  ">>%DiskRoot%\pass.cmd
ECHO ECHO.   65. %%a>>%DiskRoot%\pass.cmd
ECHO )>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO echo     0.  ‚Ґагвмбп ў  з «м®Ґ ¬Ґо  >>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO Choice /C 0%summ% /M "‚лЎҐаЁвҐ ®¬Ґа Ї®«м§®ў вҐ«п(select the number of the user):">>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO if %errorlevel%==1 cls & Endlocal & set chs=Menu & goto LABLE>>%DiskRoot%\pass.cmd
ECHO set /a choi=%errorlevel%-1>>%DiskRoot%\pass.cmd
ECHO set choi_usr=>>%DiskRoot%\pass.cmd
ECHO cls>>%DiskRoot%\pass.cmd
ECHO if %$x%==1 set chs=2>>%DiskRoot%\pass.cmd
ECHO if %$x%==3 set chs=3>>%DiskRoot%\pass.cmd
ECHO if %$x%==5 set chs=5>>%DiskRoot%\pass.cmd
ECHO goto LABLE>>%DiskRoot%\pass.cmd
ECHO :2>>%DiskRoot%\pass.cmd
ECHO echo  ННННННН ‘¬Ґ  Ї а®«п гзҐв®© § ЇЁбЁ %choi_usr% НННННННННННННННННННННННННННН>>%DiskRoot%\pass.cmd
ECHO Echo.>>%DiskRoot%\pass.cmd
ECHO echo ‚Ё¬ ЁҐ, ўў®¤Ё¬лҐ бЁ¬ў®«л Ґ ®в®Ўа®¦ овбп.>>%DiskRoot%\pass.cmd
ECHO net user %choi_usr% *>>%DiskRoot%\pass.cmd
ECHO set err=%ErrorLevel%>>%DiskRoot%\pass.cmd
ECHO Echo.>>%DiskRoot%\pass.cmd
ECHO Echo ЙННННННННННННННННННННННННННННННННННННННННННН»>>%DiskRoot%\pass.cmd
ECHO if %err%==0 (Echo є     Џ а®«м Ё§¬ҐҐ *Password Changed*     є) else (color 4f & Echo є  Џ а®«м Ґ Ё§¬ҐҐ *Password Not Changed* є)>>%DiskRoot%\pass.cmd
ECHO Echo ИНННННННННННННННННННННННННННННННННННННННННННј >>%DiskRoot%\pass.cmd
ECHO Echo.& Echo.>>%DiskRoot%\pass.cmd
ECHO if %err%==0 (Timeout /T 1 > nul) else (Timeout /T -1)>>%DiskRoot%\pass.cmd
ECHO color 1f>>%DiskRoot%\pass.cmd
ECHO if %err% neq 0 goto 2-2>>%DiskRoot%\pass.cmd
ECHO if %na% gtr %choi% goto 2-2>>%DiskRoot%\pass.cmd
ECHO cls>>%DiskRoot%\pass.cmd
ECHO set chs=2-1>>%DiskRoot%\pass.cmd
ECHO goto LABLE>>%DiskRoot%\pass.cmd
ECHO :2-1>>%DiskRoot%\pass.cmd
ECHO Echo.>>%DiskRoot%\pass.cmd
ECHO Echo ЙНННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННН»>>%DiskRoot%\pass.cmd
ECHO echo є     Џ а®«м гзҐв®© § ЇЁбЁ %choi_usr% - Ўл« Ё§¬ҐҐ (Password Changed)      є>>%DiskRoot%\pass.cmd
ECHO Echo ИННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННј>>%DiskRoot%\pass.cmd
ECHO Echo.& Echo.& Echo.>>%DiskRoot%\pass.cmd
ECHO echo НННННННННННННННННННННННННННННН ‚Ё¬ ЁҐ НННННННННННННННННННННННННННННННННН>>%DiskRoot%\pass.cmd
ECHO Echo.>>%DiskRoot%\pass.cmd
ECHO Choice /M "‚лЎа   Ґ  ЄвЁў п гзҐв п § ЇЁбм. ЂЄвЁўЁа®ў вм?">>%DiskRoot%\pass.cmd
ECHO Echo.>>%DiskRoot%\pass.cmd
ECHO if %errorlevel%==2 goto :2-2>>%DiskRoot%\pass.cmd
ECHO net user %choi_usr% /ACTIVE:YES>>%DiskRoot%\pass.cmd
ECHO set err=%ErrorLevel%>>%DiskRoot%\pass.cmd
ECHO Echo.& Echo.>>%DiskRoot%\pass.cmd
ECHO if %err%==0  (Timeout /T 1 > nul) else (color 4f &Timeout /T -1)>>%DiskRoot%\pass.cmd
ECHO color 1f>>%DiskRoot%\pass.cmd
ECHO :2-2>>%DiskRoot%\pass.cmd
ECHO Endlocal>>%DiskRoot%\pass.cmd
ECHO cls>>%DiskRoot%\pass.cmd
ECHO set chs=MENU>>%DiskRoot%\pass.cmd
ECHO goto LABLE>>%DiskRoot%\pass.cmd
ECHO :3>>%DiskRoot%\pass.cmd
ECHO echo  ННННННН “¤ «ҐЁҐ гзҐв®© § ЇЁбЁ %choi_usr% НННННННННННННННННННННННННННН>>%DiskRoot%\pass.cmd
ECHO echo. & echo.>>%DiskRoot%\pass.cmd
ECHO echo 1. „Ґ©бвўЁвҐ«м® г¤ «Ёвм %choi_usr%>>%DiskRoot%\pass.cmd
ECHO echo 2. ‚лЎа вм ¤агЈго гзҐвго § ЇЁбм>>%DiskRoot%\pass.cmd
ECHO echo 0. ‚Ґагвмбп ў  з «м®Ґ ¬Ґо>>%DiskRoot%\pass.cmd
ECHO echo. & echo.>>%DiskRoot%\pass.cmd
ECHO Choice /C 120 /M "‚лЎҐаЁвҐ ЇгЄв:">>%DiskRoot%\pass.cmd
ECHO if %errorlevel%==1  goto 3-1>>%DiskRoot%\pass.cmd
ECHO if %errorlevel%==2 cls & Endlocal & set chs=LIST & set $x=3 & goto LABLE>>%DiskRoot%\pass.cmd
ECHO if %errorlevel%==3 cls & Endlocal & set chs=Menu & goto LABLE>>%DiskRoot%\pass.cmd
ECHO :3-1>>%DiskRoot%\pass.cmd
ECHO net user %choi_usr% /DELETE>>%DiskRoot%\pass.cmd
ECHO set err=%ErrorLevel%>>%DiskRoot%\pass.cmd
ECHO Echo.& Echo.>>%DiskRoot%\pass.cmd
ECHO if %err%==0  (echo Џ®«м§®ў вҐ«м г¤ «Ґ...  & Timeout /T 1 > nul) else (color 4f & echo “зҐв п § ЇЁбм Ґ г¤ «Ґ ... & Timeout /T -1)>>%DiskRoot%\pass.cmd
ECHO color 1f>>%DiskRoot%\pass.cmd
ECHO Endlocal>>%DiskRoot%\pass.cmd
ECHO cls>>%DiskRoot%\pass.cmd
ECHO set chs=MENU>>%DiskRoot%\pass.cmd
ECHO goto LABLE>>%DiskRoot%\pass.cmd
ECHO :4>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO echo  ННННННННННННННННННН ‘®§¤ ЁҐ гзҐв®© § ЇЁбЁ  ¤¬ЁЁбва в®а  НННННННННННННННННН>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO echo ‚ўҐ¤ЁвҐ: '-0' ¤«п ўле®¤  ў ¬Ґо (ЃҐ§ Є ўлзҐЄ)>>%DiskRoot%\pass.cmd
ECHO set /P var="‚ўҐ¤ЁвҐ Ё¬п: ">>%DiskRoot%\pass.cmd
ECHO if %var%==-0 cls & Endlocal & set chs=Menu & goto LABLE>>%DiskRoot%\pass.cmd
ECHO net user %var% /add>>%DiskRoot%\pass.cmd
ECHO set err=%ErrorLevel%>>%DiskRoot%\pass.cmd
ECHO Echo.& Echo.>>%DiskRoot%\pass.cmd
ECHO if %err%==0  (echo Џ®«м§®ў вҐ«м б®§¤ ... & echo.) else (color 4f &Timeout /T -1 & goto 4-1)>>%DiskRoot%\pass.cmd
ECHO net localgroup  ¤¬ЁЁбва в®ал %var% /add>>%DiskRoot%\pass.cmd
ECHO set err=%ErrorLevel%>>%DiskRoot%\pass.cmd
ECHO Echo.>>%DiskRoot%\pass.cmd
ECHO if %err%==0  (echo Џ®«м§®ў вҐ«м ¤®Ў ў«Ґ ў ЈагЇЇг  ¤¬ЁЁбва в®ал & Timeout /T 1 > nul) else (color 4f & Timeout /T -1)>>%DiskRoot%\pass.cmd
ECHO :4-1>>%DiskRoot%\pass.cmd
ECHO color 1f>>%DiskRoot%\pass.cmd
ECHO Endlocal>>%DiskRoot%\pass.cmd
ECHO cls>>%DiskRoot%\pass.cmd
ECHO set chs=MENU>>%DiskRoot%\pass.cmd
ECHO goto LABLE>>%DiskRoot%\pass.cmd
ECHO :5>>%DiskRoot%\pass.cmd
ECHO echo  ННННННН ‘Єалвм гзҐвго § ЇЁбм %choi_usr% НННННННННННННННННННННННННННН>>%DiskRoot%\pass.cmd
ECHO echo. & echo.>>%DiskRoot%\pass.cmd
ECHO echo 1. „Ґ©бвўЁвҐ«м® бЄлвм %choi_usr%>>%DiskRoot%\pass.cmd
ECHO echo 2. ‚лЎа вм ¤агЈго гзҐвго § ЇЁбм>>%DiskRoot%\pass.cmd
ECHO echo 0. ‚Ґагвмбп ў  з «м®Ґ ¬Ґо>>%DiskRoot%\pass.cmd
ECHO echo. & echo.>>%DiskRoot%\pass.cmd
ECHO Choice /C 120 /M "‚лЎҐаЁвҐ ЇгЄв:">>%DiskRoot%\pass.cmd
ECHO if %errorlevel%==1  goto 5-1>>%DiskRoot%\pass.cmd
ECHO if %errorlevel%==2 cls & Endlocal & set chs=LIST & set $x=3 & goto LABLE>>%DiskRoot%\pass.cmd
ECHO if %errorlevel%==3 cls & Endlocal & set chs=Menu & goto LABLE>>%DiskRoot%\pass.cmd
ECHO :5-1>>%DiskRoot%\pass.cmd
ECHO reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\SpecialAccounts\UserList" /v %choi_usr% /t REG_DWORD /d 0 /f>>%DiskRoot%\pass.cmd
ECHO set err=%ErrorLevel%>>%DiskRoot%\pass.cmd
ECHO Echo.& Echo.>>%DiskRoot%\pass.cmd
ECHO if %err%==0  (echo Џ®«м§®ў вҐ«м бЄалв...  & Timeout /T 1 > nul) else (color 4f & echo “зҐв п § ЇЁбм Ґ бЄалв ... & Timeout /T -1)>>%DiskRoot%\pass.cmd
ECHO color 1f>>%DiskRoot%\pass.cmd
ECHO Endlocal>>%DiskRoot%\pass.cmd
ECHO cls>>%DiskRoot%\pass.cmd
ECHO set chs=MENU>>%DiskRoot%\pass.cmd
ECHO goto LABLE>>%DiskRoot%\pass.cmd
ECHO :6>>%DiskRoot%\pass.cmd
ECHO Setlocal EnableExtensions EnableDelayedExpansion>>%DiskRoot%\pass.cmd
ECHO for /f "usebackq tokens=1,3" %%a in (`REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\SpecialAccounts\UserList" /s`) do (>>%DiskRoot%\pass.cmd
ECHO if %%b==0x0 (>>%DiskRoot%\pass.cmd
ECHO set /a cnt+=1>>%DiskRoot%\pass.cmd
ECHO set "summ=187">>%DiskRoot%\pass.cmd
ECHO set "188=%%a">>%DiskRoot%\pass.cmd
ECHO Echo 189. %%a>>%DiskRoot%\pass.cmd
ECHO ))>>%DiskRoot%\pass.cmd
ECHO if %cnt%==0 (echo ‘Єалвле § ЇЁбҐ© Ґ  ©¤Ґ®... & Timeout /T -1 & goto 6-1)>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO echo     0.  ‚Ґагвмбп ў  з «м®Ґ ¬Ґо >>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO Choice /C 0%summ% /M "‚лЎҐаЁвҐ ®¬Ґа гзҐв®© § ЇЁбЁ:">>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO if %errorlevel%==1 cls & Endlocal & set chs=Menu & goto LABLE>>%DiskRoot%\pass.cmd
ECHO set /a choi=%errorlevel%-1>>%DiskRoot%\pass.cmd
ECHO set choi_usr=>>%DiskRoot%\pass.cmd
ECHO echo %choi_usr%>>%DiskRoot%\pass.cmd
ECHO echo %choi%>>%DiskRoot%\pass.cmd
ECHO reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\SpecialAccounts\UserList" /v %choi_usr% /t REG_DWORD /d 1 /f>>%DiskRoot%\pass.cmd
ECHO set err=%ErrorLevel%>>%DiskRoot%\pass.cmd
ECHO Echo.& Echo.>>%DiskRoot%\pass.cmd
ECHO if %err%==0  (echo Џ®«м§®ў вҐ«м Ґ бЄалв...  & Timeout /T 1 > nul) else (color 4f & echo ЌҐг¤ з ... & Timeout /T -1)>>%DiskRoot%\pass.cmd
ECHO :6-1>>%DiskRoot%\pass.cmd
ECHO color 1f>>%DiskRoot%\pass.cmd
ECHO Endlocal>>%DiskRoot%\pass.cmd
ECHO cls>>%DiskRoot%\pass.cmd
ECHO set chs=MENU>>%DiskRoot%\pass.cmd
ECHO goto LABLE>>%DiskRoot%\pass.cmd
ECHO :END>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO Endlocal>>%DiskRoot%\pass.cmd
ECHO color>>%DiskRoot%\pass.cmd
ECHO reg add HKLM\SYSTEM\Setup /v CmdLine /t REG_SZ /d "" /f>>%DiskRoot%\pass.cmd
ECHO Echo  ННННННННННННН „«п ўле®¤  Їа®бв® § Єа®©вҐ ®Є® Є®¬ ¤®© бва®ЄЁ НННННННННННННН>>%DiskRoot%\pass.cmd
ECHO start cmd /k "timeout /T 2 > nul&del /Q C:\Users\name\Desktop\pass.cmd&exit">>%DiskRoot%\pass.cmd


:end
Echo.
Echo.
Echo.
Echo.
Echo OK.
color

от туда можно выделить - Управление учетными записями пользователей Windows

CMD/BATCH:

@echo off
color 1f
set chs=MENU
set $x=0
:LABLE
Echo  ╔════════════════════════════════════════════════════════════════════════════╗
Echo  ║                                                                            ║
Echo  ║                    User Account Control Windows users                      ║
Echo  ║             Управление учетными записями пользователей Windows             ║
Echo  ║                                                                            ║
Echo  ╚════════════════════════════════════════════════════════════════════════════╝
Echo.
goto %chs%
:MENU
echo  ══════════════════════════════ Основное меню ════════════════════════════════
echo.
echo     1. Смена пароля учетной записи
echo.
echo     2. Создание учетной записи
echo.
echo     3. Удаление учетной записи
echo.
echo     4. Скрыть учетную запись
echo.
echo     5. Отоброзить учетную запись
echo. & echo.
echo         0. Выход
echo.
echo  ═════════════════════════════════════════════════════════════════════════════
echo.
Choice /C 123450 /M "Выберите пункт:"
echo.
if %errorlevel%==6 cls & goto END
if %errorlevel%==1 cls & set chs=LIST & set $x=1 & goto LABLE
if %errorlevel%==2 cls & set chs=4 & set $x=0 & goto LABLE
if %errorlevel%==3 cls & set chs=LIST & set $x=3 & goto LABLE
if %errorlevel%==4 cls & set chs=LIST & set $x=5 & goto LABLE
if %errorlevel%==5 cls & set chs=6 & set $x=0 & goto LABLE

:LIST
Echo.         Список локальных пользователей (List of local user accounts):
Setlocal EnableExtensions EnableDelayedExpansion
echo.
echo  Активные учетные записи (Active users accaunts)══════════════════════════════
echo.
for /f "usebackq tokens=2 delims==" %%a in (`WMIC UserAccount Where "LocalAccount=True And Disabled=False" Get Name /Format:List`) do (
set /a cnt+=1
set "!cnt!=%%a"
set summ=!summ!!cnt!
set "group=       "
net localgroup Администраторы | findstr /i %%a > nul
if not errorlevel 1 set "group=admin  "
ECHO. !group!  !cnt!. %%a
)
set na=!cnt!
echo.
echo  Неактивные учетные записи(Disabled users accaunts)═══════════════════════════
echo.
for /f "usebackq tokens=2 delims==" %%a in (`WMIC UserAccount Where "LocalAccount=True And Disabled=True" Get Name /Format:List`) do (
set /a cnt+=1
set "!cnt!=%%a"
set "summ=!summ!!cnt!"
set "group=       "
net localgroup Администраторы | findstr /i %%a > nul
if not errorlevel 1 set "group=admin  "
ECHO. !group!  !cnt!. %%a
)
echo.
echo     0.  Вернуться в начальное меню
echo.
Choice /C 0%summ% /M "Выберите номер пользователя(select the number of the user):"
echo.
if %errorlevel%==1 cls & Endlocal & set chs=Menu & goto LABLE
set /a choi=%errorlevel%-1
set choi_usr=!%choi%!
cls
if %$x%==1 set chs=2
if %$x%==3 set chs=3
if %$x%==5 set chs=5
goto LABLE
:2
echo  ═══════ Смена пароля учетной записи %choi_usr% ════════════════════════════
Echo.
echo Внимание, вводимые символы не отоброжаются.
net user %choi_usr% *
set err=%ErrorLevel%
Echo.
Echo ╔═══════════════════════════════════════════╗
if %err%==0 (Echo ║     Пароль изменен *Password Changed*     ║) else (color 4f & Echo ║  Пароль не изменен *Password Not Changed* ║)
Echo ╚═══════════════════════════════════════════╝
Echo.& Echo.
if %err%==0 (Timeout /T 1 > nul) else (Timeout /T -1)
color 1f
if %err% neq 0 goto 2-2
if %na% gtr %choi% goto 2-2
cls
set chs=2-1
goto LABLE
:2-1
Echo.
Echo ╔════════════════════════════════════════════════════════════════════════════╗
echo ║     Пароль учетной записи %choi_usr% - был изменен (Password Changed)      ║
Echo ╚════════════════════════════════════════════════════════════════════════════╝
Echo.& Echo.& Echo.
echo ══════════════════════════════ Внимание!!! ══════════════════════════════════
Echo.
Choice /M "Выбрана не активная учетная запись. Активировать?"
Echo.
if %errorlevel%==2 goto :2-2
net user %choi_usr% /ACTIVE:YES
set err=%ErrorLevel%
Echo.& Echo.
if %err%==0  (Timeout /T 1 > nul) else (color 4f &Timeout /T -1)
color 1f
:2-2
Endlocal
cls
set chs=MENU
goto LABLE
:3
echo  ═══════ Удаление учетной записи %choi_usr% ════════════════════════════
echo. & echo.
echo 1. Действительно удалить %choi_usr%
echo 2. Выбрать другую учетную запись
echo 0. Вернуться в начальное меню
echo. & echo.
Choice /C 120 /M "Выберите пункт:"
if %errorlevel%==1  goto 3-1
if %errorlevel%==2 cls & Endlocal & set chs=LIST & set $x=3 & goto LABLE
if %errorlevel%==3 cls & Endlocal & set chs=Menu & goto LABLE
:3-1
net user %choi_usr% /DELETE
set err=%ErrorLevel%
Echo.& Echo.
if %err%==0  (echo Пользователь удален...  & Timeout /T 1 > nul) else (color 4f & echo Учетная запись не удалена... & Timeout /T -1)
color 1f
Endlocal
cls
set chs=MENU
goto LABLE
:4
echo.
echo  ═══════════════════ Создание учетной записи администратора ══════════════════
echo.
echo Введите: '-0' для выхода в меню (Без кавычек)
set /P var="Введите имя: "
if %var%==-0 cls & Endlocal & set chs=Menu & goto LABLE
net user %var% /add
set err=%ErrorLevel%
Echo.& Echo.
if %err%==0  (echo Пользователь создан... & echo.) else (color 4f &Timeout /T -1 & goto 4-1)
net localgroup администраторы %var% /add
set err=%ErrorLevel%
Echo.
if %err%==0  (echo Пользователь добавлен в группу администраторы & Timeout /T 1 > nul) else (color 4f & Timeout /T -1)
:4-1
color 1f
Endlocal
cls
set chs=MENU
goto LABLE
:5
echo  ═══════ Скрыть учетную запись %choi_usr% ════════════════════════════
echo. & echo.
echo 1. Действительно скыть %choi_usr%
echo 2. Выбрать другую учетную запись
echo 0. Вернуться в начальное меню
echo. & echo.
Choice /C 120 /M "Выберите пункт:"
if %errorlevel%==1  goto 5-1
if %errorlevel%==2 cls & Endlocal & set chs=LIST & set $x=3 & goto LABLE
if %errorlevel%==3 cls & Endlocal & set chs=Menu & goto LABLE
:5-1
reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\SpecialAccounts\UserList" /v %choi_usr% /t REG_DWORD /d 0 /f
set err=%ErrorLevel%
Echo.& Echo.
if %err%==0  (echo Пользователь скрыт...  & Timeout /T 1 > nul) else (color 4f & echo Учетная запись не скрыта... & Timeout /T -1)
color 1f
Endlocal
cls
set chs=MENU
goto LABLE
:6
Setlocal EnableExtensions EnableDelayedExpansion
for /f "usebackq tokens=1,3" %%a in (`REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\SpecialAccounts\UserList" /s`) do (
if %%b==0x0 (
set /a cnt+=1
set "summ=!summ!!cnt!"
set "!cnt!=%%a"
Echo !cnt!. %%a
))
if %cnt%==0 (echo Скрытых записей не найденно... & Timeout /T -1 & goto 6-1)
echo.
echo     0.  Вернуться в начальное меню
echo.
Choice /C 0%summ% /M "Выберите номер учетной записи:"
echo.
if %errorlevel%==1 cls & Endlocal & set chs=Menu & goto LABLE
set /a choi=%errorlevel%-1
set choi_usr=!%choi%!
echo %choi_usr%
echo %choi%
reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\SpecialAccounts\UserList" /v %choi_usr% /t REG_DWORD /d 1 /f
set err=%ErrorLevel%
Echo.& Echo.
if %err%==0  (echo Пользователь не скрыт...  & Timeout /T 1 > nul) else (color 4f & echo Неудача... & Timeout /T -1)
:6-1
color 1f
Endlocal
cls
set chs=MENU
goto LABLE
:END
echo.
Endlocal
color
reg add HKLM\SYSTEM\Setup /v CmdLine /t REG_SZ /d "" /f
Echo  ═════════════ Для выхода просто закройте окно командной строки ══════════════

rem start cmd /k "timeout /T 2 > nul&del /Q C:\Users\name\Desktop\pass.cmd&exit"

Dragokas · 19 Фев 2016

Foxik, это уже протестированный вариант?
Выложите, пожалуйста, в виде файла. Я обновлю ресурс.

fseto · 19 Фев 2016

Phoenix написал(а):
Если пароль сброшен администратором, доступ к некоторым файлам может быть утерян.

Правильно сказано.
Для ОС до 7-ки включительно есть утила, которая не сбрасывает пароль, а вычисляет его и красиво показывает. Конечно, чем проще пароль тем быстрее и с большей вероятностью пароль будет найден.

Phoenix · 19 Фев 2016

Dragokas написал(а):
Foxik, это уже протестированный вариант?
Выложите, пожалуйста, в виде файла. Я обновлю ресурс.

Нет. Надо тестировать. У меня просто вылетают при выборе диска или меню. Надо твоим отладчиком погонять интерцептом.

PHP:

Ошибка: Не удается найти указанный раздел или параметр в реестре.

Непредвиденное появление: (echo.

PHP:

Удалось найти раздел с Windows на диске C:.
Чтобы выбрать другой раздел - введите букву диска, в формате C:
Чтобы выбрать C:, нажмите Enter:

Выбран диск C:
Фаил C:\windows\system32\config\system найден.

Операция успешно завершена.

PHP:

╔════════════════════════════════════════════════════════════════════════════
║
║                  Change Password User Accounts in Windows
║             Смена пароля учетных записей пользователей Windows
║
╚════════════════════════════════════════════════════════════════════════════
Удалось найти раздел с Windows на диске C:.
Чтобы выбрать другой раздел - введите букву диска, в формате C:
Чтобы выбрать C:, нажмите Enter: f

Выбран диск C:
Фаил C:\windows\system32\config\system найден.

Операция успешно завершена.
Операция успешно завершена.
Операция успешно завершена.




OK.

PHP:

 ╔════════════════════════════════════════════════════════════════════════════╗
 ║                                                                            ║
 ║                  Change Password User Accounts in Windows                  ║
 ║             Смена пароля учетных записей пользователей Windows             ║
 ║                                                                            ║
 ╚════════════════════════════════════════════════════════════════════════════╝
Удалось найти раздел с Windows на диске C:.
Чтобы выбрать другой раздел - введите букву диска, в формате C:
Чтобы выбрать C:, нажмите Enter: Ж:

Выбран диск C:
Фаил C:\windows\system32\config\system найден.

Операция успешно завершена.
Операция успешно завершена.
Операция успешно завершена.




OK.

Foxik · 20 Фев 2016

Phoenix, скрипт для запуска из сторонней ОСи, например PE и т.д., и т.п.....
Но меняет пароль при загрузке своей системы, что равнозначно обычной смене пароля без потери доступа.

Dragokas, тестил на win 8... на 2-х компах...

Foxik · 20 Фев 2016

изменил $x на ssx

CMD/BATCH:

@echo off
rem  *****************************************************
rem Description: Change Password User Accounts in Windows
rem Copyright: Foxik
rem Create: 2014
rem  *****************************************************
color 1f
Echo  ╔════════════════════════════════════════════════════════════════════════════╗
Echo  ║                                                                            ║
Echo  ║                  Change Password User Accounts in Windows                  ║
Echo  ║             Смена пароля учетных записей пользователей Windows             ║
Echo  ║                                                                            ║
Echo  ╚════════════════════════════════════════════════════════════════════════════╝

set DiskRoot=
set count=0
for %%D in (C D E F G H I J K L M N O P Q R S T U V W X Y Z) do (
if exist %%D:\Windows\system32\config\SYSTEM (
if %%D: NEQ %systemdrive% (
set DiskRoot=%%D:
set /a count+=1
)
)
)
If %count% == 0 goto DISK0
If %count% == 1 goto DISK1

echo Найдено более одного раздела с Windows
echo Чтобы выбрать раздел - введите букву диска, в формате C:
set /p %DiskRoot%= Введите букву раздела:
set FilePath=%DiskRoot%\windows\system32\config\system
goto NEXT

:DISK0
Echo Не удалось найти раздел с Windows.
Echo Необходим фаил Disk:\windows\system32\config\system
set /p %FilePath%=Введите путь к фаилу:
if "%FilePath%" == "" (Echo Путь не указан!!! & goto end)
set %DiskRoot%=%FilePath:~0,2%
goto NEXT

:DISK1
Echo Удалось найти раздел с Windows на диске %DiskRoot%. 
Echo Чтобы выбрать другой раздел - введите букву диска, в формате C:
set /p %DiskRoot%= Чтобы выбрать %DiskRoot%, нажмите Enter: 
set FilePath=%DiskRoot%\windows\system32\config\system

:NEXT
Echo.
Echo Выбран диск %DiskRoot%
if not exist %FilePath% (Echo File not found & goto end)
Echo Фаил %FilePath% найден.
Echo.

reg load HKLM\111 %FilePath%
reg add HKLM\111\Setup /v CmdLine /t REG_SZ /d "cmd.exe /k "%%systemdrive%%"\pass.cmd" /f
reg add HKLM\111\Setup /v SetupType /t REG_DWORD /d 2 /f

ECHO @echo off>%DiskRoot%\pass.cmd
ECHO color 1f>>%DiskRoot%\pass.cmd
ECHO set chs=MENU>>%DiskRoot%\pass.cmd
ECHO set ssx=0>>%DiskRoot%\pass.cmd
ECHO :LABLE>>%DiskRoot%\pass.cmd
ECHO Echo  ╔════════════════════════════════════════════════════════════════════════════╗>>%DiskRoot%\pass.cmd
ECHO Echo  ║                                                                            ║>>%DiskRoot%\pass.cmd
ECHO Echo  ║                  Change Password User Accounts in Windows                  ║>>%DiskRoot%\pass.cmd
ECHO Echo  ║             Смена пароля учетных записей пользователей Windows             ║>>%DiskRoot%\pass.cmd
ECHO Echo  ║                                                                            ║>>%DiskRoot%\pass.cmd
ECHO Echo  ╚════════════════════════════════════════════════════════════════════════════╝>>%DiskRoot%\pass.cmd
ECHO Echo.>>%DiskRoot%\pass.cmd
ECHO goto %chs%>>%DiskRoot%\pass.cmd
ECHO :MENU>>%DiskRoot%\pass.cmd
ECHO echo  ══════════════════════════════ Основное меню ════════════════════════════════>>%DiskRoot%\pass.cmd
ECHO echo. >>%DiskRoot%\pass.cmd
ECHO echo     1. Смена пароля учетной записи>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO echo     2. Создание учетной записи>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO echo     3. Удаление учетной записи>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO echo     4. Скрыть учетную запись>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO echo     5. Отоброзить учетную запись>>%DiskRoot%\pass.cmd
ECHO echo. & echo.>>%DiskRoot%\pass.cmd
ECHO echo         0. Выход>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO echo  ═════════════════════════════════════════════════════════════════════════════>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO Choice /C 123450 /M "Выберите пункт:">>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO if %errorlevel%==6 cls & goto END>>%DiskRoot%\pass.cmd
ECHO if %errorlevel%==1 cls & set chs=LIST & set ssx=1 & goto LABLE>>%DiskRoot%\pass.cmd
ECHO if %errorlevel%==2 cls & set chs=4 & set ssx=0 & goto LABLE>>%DiskRoot%\pass.cmd
ECHO if %errorlevel%==3 cls & set chs=LIST & set ssx=3 & goto LABLE>>%DiskRoot%\pass.cmd
ECHO if %errorlevel%==4 cls & set chs=LIST & set ssx=5 & goto LABLE>>%DiskRoot%\pass.cmd
ECHO if %errorlevel%==5 cls & set chs=6 & set ssx=0 & goto LABLE>>%DiskRoot%\pass.cmd
ECHO :LIST>>%DiskRoot%\pass.cmd
ECHO Echo.         Список локальных пользователей (List of local user accounts): >>%DiskRoot%\pass.cmd
ECHO Setlocal EnableExtensions EnableDelayedExpansion >>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO echo  Активные учетные записи (Active users accaunts)══════════════════════════════>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO for /f "usebackq tokens=2 delims==" %%a in (`WMIC UserAccount Where "LocalAccount=True And Disabled=False" Get Name /Format:List`) do (>>%DiskRoot%\pass.cmd
ECHO set /a cnt+=1>>%DiskRoot%\pass.cmd
ECHO set "47=%%a">>%DiskRoot%\pass.cmd
ECHO set summ=48>>%DiskRoot%\pass.cmd
ECHO set "group=       ">>%DiskRoot%\pass.cmd
ECHO net localgroup Администраторы | findstr /i %%a > nul>>%DiskRoot%\pass.cmd
ECHO if not errorlevel 1 set "group=admin  ">>%DiskRoot%\pass.cmd
ECHO ECHO.   52. %%a>>%DiskRoot%\pass.cmd
ECHO )>>%DiskRoot%\pass.cmd
ECHO set na=54>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO echo  Неактивные учетные записи(Disabled users accaunts)═══════════════════════════>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO for /f "usebackq tokens=2 delims==" %%a in (`WMIC UserAccount Where "LocalAccount=True And Disabled=True" Get Name /Format:List`) do (>>%DiskRoot%\pass.cmd
ECHO set /a cnt+=1>>%DiskRoot%\pass.cmd
ECHO set "60=%%a">>%DiskRoot%\pass.cmd
ECHO set "summ=61">>%DiskRoot%\pass.cmd
ECHO set "group=       ">>%DiskRoot%\pass.cmd
ECHO net localgroup Администраторы | findstr /i %%a > nul>>%DiskRoot%\pass.cmd
ECHO if not errorlevel 1 set "group=admin  ">>%DiskRoot%\pass.cmd
ECHO ECHO.   65. %%a>>%DiskRoot%\pass.cmd
ECHO )>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO echo     0.  Вернуться в начальное меню  >>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO Choice /C 0%summ% /M "Выберите номер пользователя(select the number of the user):">>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO if %errorlevel%==1 cls & Endlocal & set chs=Menu & goto LABLE>>%DiskRoot%\pass.cmd
ECHO set /a choi=%errorlevel%-1>>%DiskRoot%\pass.cmd
ECHO set choi_usr=>>%DiskRoot%\pass.cmd
ECHO cls>>%DiskRoot%\pass.cmd
ECHO if %ssx%==1 set chs=2>>%DiskRoot%\pass.cmd
ECHO if %ssx%==3 set chs=3>>%DiskRoot%\pass.cmd
ECHO if %ssx%==5 set chs=5>>%DiskRoot%\pass.cmd
ECHO goto LABLE>>%DiskRoot%\pass.cmd
ECHO :2>>%DiskRoot%\pass.cmd
ECHO echo  ═══════ Смена пароля учетной записи %choi_usr% ════════════════════════════>>%DiskRoot%\pass.cmd
ECHO Echo.>>%DiskRoot%\pass.cmd
ECHO echo Внимание, вводимые символы не отоброжаются.>>%DiskRoot%\pass.cmd
ECHO net user %choi_usr% *>>%DiskRoot%\pass.cmd
ECHO set err=%ErrorLevel%>>%DiskRoot%\pass.cmd
ECHO Echo.>>%DiskRoot%\pass.cmd
ECHO Echo ╔═══════════════════════════════════════════╗>>%DiskRoot%\pass.cmd
ECHO if %err%==0 (Echo ║     Пароль изменен *Password Changed*     ║) else (color 4f & Echo ║  Пароль не изменен *Password Not Changed* ║)>>%DiskRoot%\pass.cmd
ECHO Echo ╚═══════════════════════════════════════════╝ >>%DiskRoot%\pass.cmd
ECHO Echo.& Echo.>>%DiskRoot%\pass.cmd
ECHO if %err%==0 (Timeout /T 1 > nul) else (Timeout /T -1)>>%DiskRoot%\pass.cmd
ECHO color 1f>>%DiskRoot%\pass.cmd
ECHO if %err% neq 0 goto 2-2>>%DiskRoot%\pass.cmd
ECHO if %na% gtr %choi% goto 2-2>>%DiskRoot%\pass.cmd
ECHO cls>>%DiskRoot%\pass.cmd
ECHO set chs=2-1>>%DiskRoot%\pass.cmd
ECHO goto LABLE>>%DiskRoot%\pass.cmd
ECHO :2-1>>%DiskRoot%\pass.cmd
ECHO Echo.>>%DiskRoot%\pass.cmd
ECHO Echo ╔════════════════════════════════════════════════════════════════════════════╗>>%DiskRoot%\pass.cmd
ECHO echo ║     Пароль учетной записи %choi_usr% - был изменен (Password Changed)      ║>>%DiskRoot%\pass.cmd
ECHO Echo ╚════════════════════════════════════════════════════════════════════════════╝>>%DiskRoot%\pass.cmd
ECHO Echo.& Echo.& Echo.>>%DiskRoot%\pass.cmd
ECHO echo ══════════════════════════════ Внимание ══════════════════════════════════>>%DiskRoot%\pass.cmd
ECHO Echo.>>%DiskRoot%\pass.cmd
ECHO Choice /M "Выбрана не активная учетная запись. Активировать?">>%DiskRoot%\pass.cmd
ECHO Echo.>>%DiskRoot%\pass.cmd
ECHO if %errorlevel%==2 goto :2-2>>%DiskRoot%\pass.cmd
ECHO net user %choi_usr% /ACTIVE:YES>>%DiskRoot%\pass.cmd
ECHO set err=%ErrorLevel%>>%DiskRoot%\pass.cmd
ECHO Echo.& Echo.>>%DiskRoot%\pass.cmd
ECHO if %err%==0  (Timeout /T 1 > nul) else (color 4f &Timeout /T -1)>>%DiskRoot%\pass.cmd
ECHO color 1f>>%DiskRoot%\pass.cmd
ECHO :2-2>>%DiskRoot%\pass.cmd
ECHO Endlocal>>%DiskRoot%\pass.cmd
ECHO cls>>%DiskRoot%\pass.cmd
ECHO set chs=MENU>>%DiskRoot%\pass.cmd
ECHO goto LABLE>>%DiskRoot%\pass.cmd
ECHO :3>>%DiskRoot%\pass.cmd
ECHO echo  ═══════ Удаление учетной записи %choi_usr% ════════════════════════════>>%DiskRoot%\pass.cmd
ECHO echo. & echo.>>%DiskRoot%\pass.cmd
ECHO echo 1. Действительно удалить %choi_usr%>>%DiskRoot%\pass.cmd
ECHO echo 2. Выбрать другую учетную запись>>%DiskRoot%\pass.cmd
ECHO echo 0. Вернуться в начальное меню>>%DiskRoot%\pass.cmd
ECHO echo. & echo.>>%DiskRoot%\pass.cmd
ECHO Choice /C 120 /M "Выберите пункт:">>%DiskRoot%\pass.cmd
ECHO if %errorlevel%==1  goto 3-1>>%DiskRoot%\pass.cmd
ECHO if %errorlevel%==2 cls & Endlocal & set chs=LIST & set ssx=3 & goto LABLE>>%DiskRoot%\pass.cmd
ECHO if %errorlevel%==3 cls & Endlocal & set chs=Menu & goto LABLE>>%DiskRoot%\pass.cmd
ECHO :3-1>>%DiskRoot%\pass.cmd
ECHO net user %choi_usr% /DELETE>>%DiskRoot%\pass.cmd
ECHO set err=%ErrorLevel%>>%DiskRoot%\pass.cmd
ECHO Echo.& Echo.>>%DiskRoot%\pass.cmd
ECHO if %err%==0  (echo Пользователь удален...  & Timeout /T 1 > nul) else (color 4f & echo Учетная запись не удалена... & Timeout /T -1)>>%DiskRoot%\pass.cmd
ECHO color 1f>>%DiskRoot%\pass.cmd
ECHO Endlocal>>%DiskRoot%\pass.cmd
ECHO cls>>%DiskRoot%\pass.cmd
ECHO set chs=MENU>>%DiskRoot%\pass.cmd
ECHO goto LABLE>>%DiskRoot%\pass.cmd
ECHO :4>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO echo  ═══════════════════ Создание учетной записи администратора ══════════════════>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO echo Введите: '-0' для выхода в меню (Без кавычек)>>%DiskRoot%\pass.cmd
ECHO set /P var="Введите имя: ">>%DiskRoot%\pass.cmd
ECHO if %var%==-0 cls & Endlocal & set chs=Menu & goto LABLE>>%DiskRoot%\pass.cmd
ECHO net user %var% /add>>%DiskRoot%\pass.cmd
ECHO set err=%ErrorLevel%>>%DiskRoot%\pass.cmd
ECHO Echo.& Echo.>>%DiskRoot%\pass.cmd
ECHO if %err%==0  (echo Пользователь создан... & echo.) else (color 4f &Timeout /T -1 & goto 4-1)>>%DiskRoot%\pass.cmd
ECHO net localgroup администраторы %var% /add>>%DiskRoot%\pass.cmd
ECHO set err=%ErrorLevel%>>%DiskRoot%\pass.cmd
ECHO Echo.>>%DiskRoot%\pass.cmd
ECHO if %err%==0  (echo Пользователь добавлен в группу администраторы & Timeout /T 1 > nul) else (color 4f & Timeout /T -1)>>%DiskRoot%\pass.cmd
ECHO :4-1>>%DiskRoot%\pass.cmd
ECHO color 1f>>%DiskRoot%\pass.cmd
ECHO Endlocal>>%DiskRoot%\pass.cmd
ECHO cls>>%DiskRoot%\pass.cmd
ECHO set chs=MENU>>%DiskRoot%\pass.cmd
ECHO goto LABLE>>%DiskRoot%\pass.cmd
ECHO :5>>%DiskRoot%\pass.cmd
ECHO echo  ═══════ Скрыть учетную запись %choi_usr% ════════════════════════════>>%DiskRoot%\pass.cmd
ECHO echo. & echo.>>%DiskRoot%\pass.cmd
ECHO echo 1. Действительно скыть %choi_usr%>>%DiskRoot%\pass.cmd
ECHO echo 2. Выбрать другую учетную запись>>%DiskRoot%\pass.cmd
ECHO echo 0. Вернуться в начальное меню>>%DiskRoot%\pass.cmd
ECHO echo. & echo.>>%DiskRoot%\pass.cmd
ECHO Choice /C 120 /M "Выберите пункт:">>%DiskRoot%\pass.cmd
ECHO if %errorlevel%==1  goto 5-1>>%DiskRoot%\pass.cmd
ECHO if %errorlevel%==2 cls & Endlocal & set chs=LIST & set ssx=3 & goto LABLE>>%DiskRoot%\pass.cmd
ECHO if %errorlevel%==3 cls & Endlocal & set chs=Menu & goto LABLE>>%DiskRoot%\pass.cmd
ECHO :5-1>>%DiskRoot%\pass.cmd
ECHO reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\SpecialAccounts\UserList" /v %choi_usr% /t REG_DWORD /d 0 /f>>%DiskRoot%\pass.cmd
ECHO set err=%ErrorLevel%>>%DiskRoot%\pass.cmd
ECHO Echo.& Echo.>>%DiskRoot%\pass.cmd
ECHO if %err%==0  (echo Пользователь скрыт...  & Timeout /T 1 > nul) else (color 4f & echo Учетная запись не скрыта... & Timeout /T -1)>>%DiskRoot%\pass.cmd
ECHO color 1f>>%DiskRoot%\pass.cmd
ECHO Endlocal>>%DiskRoot%\pass.cmd
ECHO cls>>%DiskRoot%\pass.cmd
ECHO set chs=MENU>>%DiskRoot%\pass.cmd
ECHO goto LABLE>>%DiskRoot%\pass.cmd
ECHO :6>>%DiskRoot%\pass.cmd
ECHO Setlocal EnableExtensions EnableDelayedExpansion>>%DiskRoot%\pass.cmd
ECHO for /f "usebackq tokens=1,3" %%a in (`REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\SpecialAccounts\UserList" /s`) do (>>%DiskRoot%\pass.cmd
ECHO if %%b==0x0 (>>%DiskRoot%\pass.cmd
ECHO set /a cnt+=1>>%DiskRoot%\pass.cmd
ECHO set "summ=187">>%DiskRoot%\pass.cmd
ECHO set "188=%%a">>%DiskRoot%\pass.cmd
ECHO Echo 189. %%a>>%DiskRoot%\pass.cmd
ECHO ))>>%DiskRoot%\pass.cmd
ECHO if %cnt%==0 (echo Скрытых записей не найденно... & Timeout /T -1 & goto 6-1)>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO echo     0.  Вернуться в начальное меню >>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO Choice /C 0%summ% /M "Выберите номер учетной записи:">>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO if %errorlevel%==1 cls & Endlocal & set chs=Menu & goto LABLE>>%DiskRoot%\pass.cmd
ECHO set /a choi=%errorlevel%-1>>%DiskRoot%\pass.cmd
ECHO set choi_usr=>>%DiskRoot%\pass.cmd
ECHO echo %choi_usr%>>%DiskRoot%\pass.cmd
ECHO echo %choi%>>%DiskRoot%\pass.cmd
ECHO reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\SpecialAccounts\UserList" /v %choi_usr% /t REG_DWORD /d 1 /f>>%DiskRoot%\pass.cmd
ECHO set err=%ErrorLevel%>>%DiskRoot%\pass.cmd
ECHO Echo.& Echo.>>%DiskRoot%\pass.cmd
ECHO if %err%==0  (echo Пользователь не скрыт...  & Timeout /T 1 > nul) else (color 4f & echo Неудача... & Timeout /T -1)>>%DiskRoot%\pass.cmd
ECHO :6-1>>%DiskRoot%\pass.cmd
ECHO color 1f>>%DiskRoot%\pass.cmd
ECHO Endlocal>>%DiskRoot%\pass.cmd
ECHO cls>>%DiskRoot%\pass.cmd
ECHO set chs=MENU>>%DiskRoot%\pass.cmd
ECHO goto LABLE>>%DiskRoot%\pass.cmd
ECHO :END>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO Endlocal>>%DiskRoot%\pass.cmd
ECHO color>>%DiskRoot%\pass.cmd
ECHO reg add HKLM\SYSTEM\Setup /v CmdLine /t REG_SZ /d "" /f>>%DiskRoot%\pass.cmd
ECHO Echo  ═════════════ Для выхода просто закройте окно командной строки ══════════════>>%DiskRoot%\pass.cmd
ECHO rem start cmd /k "timeout /T 2 > nul&del /Q C:\Users\name\Desktop\pass.cmd&exit">>%DiskRoot%\pass.cmd


:end
Echo.
Echo.
Echo.
Echo.
Echo OK.
color

Foxik · 20 Фев 2016

Исправил ошибки создания pass.cmd

CMD/BATCH:

@echo off
rem  *****************************************************
rem Description: Change Password User Accounts in Windows
rem Copyright: Foxik
rem Create: 2014
rem  *****************************************************
color 1f
Echo  ЙНННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННН»
Echo  є                                                                            є
Echo  є                  Change Password User Accounts in Windows                  є
Echo  є             ‘¬Ґ  Ї а®«п гзҐвле § ЇЁбҐ© Ї®«м§®ў вҐ«Ґ© Windows             є
Echo  є                                                                            є
Echo  ИННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННј

set DiskRoot=
set count=0
for %%D in (C D E F G H I J K L M N O P Q R S T U V W X Y Z) do (
if exist %%D:\Windows\system32\config\SYSTEM (
if %%D: NEQ %systemdrive% (
set DiskRoot=%%D:
set /a count+=1
)
)
)
If %count% == 0 goto DISK0
If %count% == 1 goto DISK1

echo Ќ ©¤Ґ® Ў®«ҐҐ ®¤®Ј® а §¤Ґ«  б Windows
echo —в®Ўл ўлЎа вм а §¤Ґ« - ўўҐ¤ЁвҐ ЎгЄўг ¤ЁбЄ , ў д®а¬ вҐ C:
set /p %DiskRoot%= ‚ўҐ¤ЁвҐ ЎгЄўг а §¤Ґ« :
set FilePath=%DiskRoot%\windows\system32\config\system
goto NEXT

:DISK0
Echo ЌҐ г¤ «®бм  ©вЁ а §¤Ґ« б Windows.
Echo ЌҐ®Ўе®¤Ё¬ д Ё« Disk:\windows\system32\config\system
set /p %FilePath%=‚ўҐ¤ЁвҐ Їгвм Є д Ё«г:
if "%FilePath%" == "" (Echo Џгвм Ґ гЄ § !!! & goto end)
set %DiskRoot%=%FilePath:~0,2%
goto NEXT

:DISK1
Echo “¤ «®бм  ©вЁ а §¤Ґ« б Windows   ¤ЁбЄҐ %DiskRoot%.
Echo —в®Ўл ўлЎа вм ¤агЈ®© а §¤Ґ« - ўўҐ¤ЁвҐ ЎгЄўг ¤ЁбЄ , ў д®а¬ вҐ C:
set /p %DiskRoot%= —в®Ўл ўлЎа вм %DiskRoot%,  ¦¬ЁвҐ Enter:
set FilePath=%DiskRoot%\windows\system32\config\system

:NEXT
Echo.
Echo ‚лЎа  ¤ЁбЄ %DiskRoot%
if not exist %FilePath% (Echo File not found & goto end)
Echo ” Ё« %FilePath%  ©¤Ґ.
Echo.

reg load HKLM\111 %FilePath%
reg add HKLM\111\Setup /v CmdLine /t REG_SZ /d "cmd.exe /k "%%systemdrive%%"\pass.cmd" /f
reg add HKLM\111\Setup /v SetupType /t REG_DWORD /d 2 /f

ECHO @echo off>%DiskRoot%\pass.cmd
ECHO color 1f>>%DiskRoot%\pass.cmd
ECHO set chs=MENU>>%DiskRoot%\pass.cmd
ECHO set ssx=^0>>%DiskRoot%\pass.cmd
ECHO :LABLE>>%DiskRoot%\pass.cmd
ECHO Echo  ЙНННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННН»>>%DiskRoot%\pass.cmd
ECHO Echo  є                                                                            є>>%DiskRoot%\pass.cmd
ECHO Echo  є                  Change Password User Accounts in Windows                  є>>%DiskRoot%\pass.cmd
ECHO Echo  є             ‘¬Ґ  Ї а®«п гзҐвле § ЇЁбҐ© Ї®«м§®ў вҐ«Ґ© Windows             є>>%DiskRoot%\pass.cmd
ECHO Echo  є                                                                            є>>%DiskRoot%\pass.cmd
ECHO Echo  ИННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННј>>%DiskRoot%\pass.cmd
ECHO Echo.>>%DiskRoot%\pass.cmd
ECHO goto %%chs%%>>%DiskRoot%\pass.cmd
ECHO :MENU>>%DiskRoot%\pass.cmd
ECHO echo  НННННННННННННННННННННННННННННН Ћб®ў®Ґ ¬Ґо НННННННННННННННННННННННННННННННН>>%DiskRoot%\pass.cmd
ECHO echo. >>%DiskRoot%\pass.cmd
ECHO echo     1. ‘¬Ґ  Ї а®«п гзҐв®© § ЇЁбЁ>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO echo     2. ‘®§¤ ЁҐ гзҐв®© § ЇЁбЁ>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO echo     3. “¤ «ҐЁҐ гзҐв®© § ЇЁбЁ>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO echo     4. ‘Єалвм гзҐвго § ЇЁбм>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO echo     5. Ћв®Ўа®§Ёвм гзҐвго § ЇЁбм>>%DiskRoot%\pass.cmd
ECHO echo. ^& echo.>>%DiskRoot%\pass.cmd
ECHO echo         0. ‚ле®¤>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO echo  ННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННН>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO Choice /C 123450 /M "‚лЎҐаЁвҐ ЇгЄв:">>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO if %%errorlevel%%==6 cls ^& goto END>>%DiskRoot%\pass.cmd
ECHO if %%errorlevel%%==1 cls ^& set chs=LIST ^& set ssx=1 ^& goto LABLE>>%DiskRoot%\pass.cmd
ECHO if %%errorlevel%%==2 cls ^& set chs=4 ^& set ssx=0 ^& goto LABLE>>%DiskRoot%\pass.cmd
ECHO if %%errorlevel%%==3 cls ^& set chs=LIST ^& set ssx=3 ^& goto LABLE>>%DiskRoot%\pass.cmd
ECHO if %%errorlevel%%==4 cls ^& set chs=LIST ^& set ssx=5 ^& goto LABLE>>%DiskRoot%\pass.cmd
ECHO if %%errorlevel%%==5 cls ^& set chs=6 ^& set ssx=0 ^& goto LABLE>>%DiskRoot%\pass.cmd
ECHO :LIST>>%DiskRoot%\pass.cmd
ECHO Echo.         ‘ЇЁб®Є «®Є «мле Ї®«м§®ў вҐ«Ґ© (List of local user accounts): >>%DiskRoot%\pass.cmd
ECHO Setlocal EnableExtensions EnableDelayedExpansion >>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO echo  ЂЄвЁўлҐ гзҐвлҐ § ЇЁбЁ (Active users accaunts)НННННННННННННННННННННННННННННН>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO for /f "usebackq tokens=2 delims==" %%%%a in (`WMIC UserAccount Where "LocalAccount=True And Disabled=False" Get Name /Format:List`) do (>>%DiskRoot%\pass.cmd
ECHO set /a cnt+=^1>>%DiskRoot%\pass.cmd
ECHO set "!cnt!=%%%%a">>%DiskRoot%\pass.cmd
ECHO set summ=!summ!!cnt!>>%DiskRoot%\pass.cmd
ECHO set "group=       ">>%DiskRoot%\pass.cmd
ECHO net localgroup Ђ¤¬ЁЁбва в®ал ^| findstr /i %%%%a ^> nul>>%DiskRoot%\pass.cmd
ECHO if not errorlevel 1 set "group=admin  ">>%DiskRoot%\pass.cmd
ECHO ECHO. !group!  !cnt!. %%%%a>>%DiskRoot%\pass.cmd
ECHO )>>%DiskRoot%\pass.cmd
ECHO set na=!cnt!>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO echo  ЌҐ ЄвЁўлҐ гзҐвлҐ § ЇЁбЁ(Disabled users accaunts)ННННННННННННННННННННННННННН>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO for /f "usebackq tokens=2 delims==" %%%%a in (`WMIC UserAccount Where "LocalAccount=True And Disabled=True" Get Name /Format:List`) do (>>%DiskRoot%\pass.cmd
ECHO set /a cnt+=^1>>%DiskRoot%\pass.cmd
ECHO set "!cnt!=%%%%a">>%DiskRoot%\pass.cmd
ECHO set "summ=!summ!!cnt!">>%DiskRoot%\pass.cmd
ECHO set "group=       ">>%DiskRoot%\pass.cmd
ECHO net localgroup Ђ¤¬ЁЁбва в®ал ^| findstr /i %%%%a ^> nul>>%DiskRoot%\pass.cmd
ECHO if not errorlevel 1 set "group=admin  ">>%DiskRoot%\pass.cmd
ECHO ECHO. !group!  !cnt!. %%%%a>>%DiskRoot%\pass.cmd
ECHO )>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO echo     0.  ‚Ґагвмбп ў  з «м®Ґ ¬Ґо  >>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO Choice /C 0%%summ%% /M "‚лЎҐаЁвҐ ®¬Ґа Ї®«м§®ў вҐ«п(select the number of the user):">>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO if %%errorlevel%%==1 cls ^& Endlocal ^& set chs=Menu ^& goto LABLE>>%DiskRoot%\pass.cmd
ECHO set /a choi=%%errorlevel%%-1>>%DiskRoot%\pass.cmd
ECHO set choi_usr=^!%%choi%%^!>>%DiskRoot%\pass.cmd
ECHO cls>>%DiskRoot%\pass.cmd
ECHO if %%ssx%%==1 set chs=2 >>%DiskRoot%\pass.cmd
ECHO if %%ssx%%==3 set chs=3 >>%DiskRoot%\pass.cmd
ECHO if %%ssx%%==5 set chs=5 >>%DiskRoot%\pass.cmd
ECHO goto LABLE>>%DiskRoot%\pass.cmd
ECHO :2>>%DiskRoot%\pass.cmd
ECHO echo  ННННННН ‘¬Ґ  Ї а®«п гзҐв®© § ЇЁбЁ %%choi_usr%% НННННННННННННННННННННННННННН>>%DiskRoot%\pass.cmd
ECHO Echo.>>%DiskRoot%\pass.cmd
ECHO echo ‚Ё¬ ЁҐ, ўў®¤Ё¬лҐ бЁ¬ў®«л Ґ ®в®Ўа®¦ овбп.>>%DiskRoot%\pass.cmd
ECHO net user %%choi_usr%% *>>%DiskRoot%\pass.cmd
ECHO set err=%%ErrorLevel%%>>%DiskRoot%\pass.cmd
ECHO Echo.>>%DiskRoot%\pass.cmd
ECHO Echo ЙННННННННННННННННННННННННННННННННННННННННННН»>>%DiskRoot%\pass.cmd
ECHO if %%err%%==0 (Echo є     Џ а®«м Ё§¬ҐҐ *Password Changed*     є) else (color 4f ^& Echo є  Џ а®«м Ґ Ё§¬ҐҐ *Password Not Changed* є)>>%DiskRoot%\pass.cmd
ECHO Echo ИНННННННННННННННННННННННННННННННННННННННННННј >>%DiskRoot%\pass.cmd
ECHO Echo.^& Echo.>>%DiskRoot%\pass.cmd
ECHO if %%err%%==0 (Timeout /T 1 ^> nul) else (Timeout /T -1)>>%DiskRoot%\pass.cmd
ECHO color 1f>>%DiskRoot%\pass.cmd
ECHO if %%err%% neq 0 goto 2-2>>%DiskRoot%\pass.cmd
ECHO if %%na%% gtr %%choi%% goto 2-2>>%DiskRoot%\pass.cmd
ECHO cls>>%DiskRoot%\pass.cmd
ECHO set chs=2-1>>%DiskRoot%\pass.cmd
ECHO goto LABLE>>%DiskRoot%\pass.cmd
ECHO :2-1>>%DiskRoot%\pass.cmd
ECHO Echo.>>%DiskRoot%\pass.cmd
ECHO Echo ЙНННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННН»>>%DiskRoot%\pass.cmd
ECHO echo є     Џ а®«м гзҐв®© § ЇЁбЁ %%choi_usr%% - Ўл« Ё§¬ҐҐ (Password Changed)      є>>%DiskRoot%\pass.cmd
ECHO Echo ИННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННННј>>%DiskRoot%\pass.cmd
ECHO Echo.^& Echo.^& Echo.>>%DiskRoot%\pass.cmd
ECHO echo НННННННННННННННННННННННННННННН ‚Ё¬ ЁҐ!!! НННННННННННННННННННННННННННННННННН>>%DiskRoot%\pass.cmd
ECHO Echo.>>%DiskRoot%\pass.cmd
ECHO Choice /M "‚лЎа   Ґ  ЄвЁў п гзҐв п § ЇЁбм. ЂЄвЁўЁа®ў вм?">>%DiskRoot%\pass.cmd
ECHO Echo.>>%DiskRoot%\pass.cmd
ECHO if %%errorlevel%%==2 goto :2-2>>%DiskRoot%\pass.cmd
ECHO net user %%choi_usr%% /ACTIVE:YES>>%DiskRoot%\pass.cmd
ECHO set err=%%ErrorLevel%%>>%DiskRoot%\pass.cmd
ECHO Echo.^& Echo.>>%DiskRoot%\pass.cmd
ECHO if %%err%%==0  (Timeout /T 1 ^> nul) else (color 4f ^& Timeout /T -1)>>%DiskRoot%\pass.cmd
ECHO color 1f>>%DiskRoot%\pass.cmd
ECHO :2-2>>%DiskRoot%\pass.cmd
ECHO Endlocal>>%DiskRoot%\pass.cmd
ECHO cls>>%DiskRoot%\pass.cmd
ECHO set chs=MENU>>%DiskRoot%\pass.cmd
ECHO goto LABLE>>%DiskRoot%\pass.cmd
ECHO :3>>%DiskRoot%\pass.cmd
ECHO echo  ННННННН “¤ «ҐЁҐ гзҐв®© § ЇЁбЁ %%choi_usr%% НННННННННННННННННННННННННННН>>%DiskRoot%\pass.cmd
ECHO echo. ^& echo.>>%DiskRoot%\pass.cmd
ECHO echo 1. „Ґ©бвўЁвҐ«м® г¤ «Ёвм %%choi_usr%%>>%DiskRoot%\pass.cmd
ECHO echo 2. ‚лЎа вм ¤агЈго гзҐвго § ЇЁбм>>%DiskRoot%\pass.cmd
ECHO echo 0. ‚Ґагвмбп ў  з «м®Ґ ¬Ґо>>%DiskRoot%\pass.cmd
ECHO echo. ^& echo.>>%DiskRoot%\pass.cmd
ECHO Choice /C 120 /M "‚лЎҐаЁвҐ ЇгЄв:">>%DiskRoot%\pass.cmd
ECHO if %%errorlevel%%==1  goto 3-1>>%DiskRoot%\pass.cmd
ECHO if %%errorlevel%%==2 cls ^& Endlocal ^& set chs=LIST ^& set ssx=3 ^& goto LABLE>>%DiskRoot%\pass.cmd
ECHO if %%errorlevel%%==3 cls ^& Endlocal ^& set chs=Menu ^& goto LABLE>>%DiskRoot%\pass.cmd
ECHO :3-1>>%DiskRoot%\pass.cmd
ECHO net user %%choi_usr%% /DELETE>>%DiskRoot%\pass.cmd
ECHO set err=%%ErrorLevel%%>>%DiskRoot%\pass.cmd
ECHO Echo.^& Echo.>>%DiskRoot%\pass.cmd
ECHO if %%err%%==0  (echo Џ®«м§®ў вҐ«м г¤ «Ґ...  ^& Timeout /T 1 ^> nul) else (color 4f ^& echo “зҐв п § ЇЁбм Ґ г¤ «Ґ ... ^& Timeout /T -1)>>%DiskRoot%\pass.cmd
ECHO color 1f>>%DiskRoot%\pass.cmd
ECHO Endlocal>>%DiskRoot%\pass.cmd
ECHO cls>>%DiskRoot%\pass.cmd
ECHO set chs=MENU>>%DiskRoot%\pass.cmd
ECHO goto LABLE>>%DiskRoot%\pass.cmd
ECHO :4>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO echo  ННННННННННННННННННН ‘®§¤ ЁҐ гзҐв®© § ЇЁбЁ  ¤¬ЁЁбва в®а  НННННННННННННННННН>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO echo ‚ўҐ¤ЁвҐ: '-0' ¤«п ўле®¤  ў ¬Ґо (ЃҐ§ Є ўлзҐЄ)>>%DiskRoot%\pass.cmd
ECHO set /P var="‚ўҐ¤ЁвҐ Ё¬п: ">>%DiskRoot%\pass.cmd
ECHO if %%var%%==-0 cls ^& Endlocal ^& set chs=Menu ^& goto LABLE>>%DiskRoot%\pass.cmd
ECHO net user %%var%% /add>>%DiskRoot%\pass.cmd
ECHO set err=%%ErrorLevel%%>>%DiskRoot%\pass.cmd
ECHO Echo.^& Echo.>>%DiskRoot%\pass.cmd
ECHO if %%err%%==0  (echo Џ®«м§®ў вҐ«м б®§¤ ... ^& echo.) else (color 4f ^&Timeout /T -1 ^& goto 4-1)>>%DiskRoot%\pass.cmd
ECHO net localgroup  ¤¬ЁЁбва в®ал %%var%% /add>>%DiskRoot%\pass.cmd
ECHO set err=%%ErrorLevel%%>>%DiskRoot%\pass.cmd
ECHO Echo.>>%DiskRoot%\pass.cmd
ECHO if %%err%%==0  (echo Џ®«м§®ў вҐ«м ¤®Ў ў«Ґ ў ЈагЇЇг  ¤¬ЁЁбва в®ал ^& Timeout /T 1 ^> nul) else (color 4f ^& Timeout /T -1)>>%DiskRoot%\pass.cmd
ECHO :4-1>>%DiskRoot%\pass.cmd
ECHO color 1f>>%DiskRoot%\pass.cmd
ECHO Endlocal>>%DiskRoot%\pass.cmd
ECHO cls>>%DiskRoot%\pass.cmd
ECHO set chs=MENU>>%DiskRoot%\pass.cmd
ECHO goto LABLE>>%DiskRoot%\pass.cmd
ECHO :5>>%DiskRoot%\pass.cmd
ECHO echo  ННННННН ‘Єалвм гзҐвго § ЇЁбм %%choi_usr%% НННННННННННННННННННННННННННН>>%DiskRoot%\pass.cmd
ECHO echo. ^& echo.>>%DiskRoot%\pass.cmd
ECHO echo 1. „Ґ©бвўЁвҐ«м® бЄлвм %%choi_usr%%>>%DiskRoot%\pass.cmd
ECHO echo 2. ‚лЎа вм ¤агЈго гзҐвго § ЇЁбм>>%DiskRoot%\pass.cmd
ECHO echo 0. ‚Ґагвмбп ў  з «м®Ґ ¬Ґо>>%DiskRoot%\pass.cmd
ECHO echo. ^& echo.>>%DiskRoot%\pass.cmd
ECHO Choice /C 120 /M "‚лЎҐаЁвҐ ЇгЄв:">>%DiskRoot%\pass.cmd
ECHO if %%errorlevel%%==1  goto 5-1>>%DiskRoot%\pass.cmd
ECHO if %%errorlevel%%==2 cls ^& Endlocal ^& set chs=LIST ^& set ssx=3 ^& goto LABLE>>%DiskRoot%\pass.cmd
ECHO if %%errorlevel%%==3 cls ^& Endlocal ^& set chs=Menu ^& goto LABLE>>%DiskRoot%\pass.cmd
ECHO :5-1>>%DiskRoot%\pass.cmd
ECHO reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\SpecialAccounts\UserList" /v %%choi_usr%% /t REG_DWORD /d 0 /f>>%DiskRoot%\pass.cmd
ECHO set err=%%ErrorLevel%%>>%DiskRoot%\pass.cmd
ECHO Echo.^& Echo.>>%DiskRoot%\pass.cmd
ECHO if %%err%%==0  (echo Џ®«м§®ў вҐ«м бЄалв...  ^& Timeout /T 1 ^> nul) else (color 4f ^& echo “зҐв п § ЇЁбм Ґ бЄалв ... ^& Timeout /T -1)>>%DiskRoot%\pass.cmd
ECHO color 1f>>%DiskRoot%\pass.cmd
ECHO Endlocal>>%DiskRoot%\pass.cmd
ECHO cls>>%DiskRoot%\pass.cmd
ECHO set chs=MENU>>%DiskRoot%\pass.cmd
ECHO goto LABLE>>%DiskRoot%\pass.cmd
ECHO :6>>%DiskRoot%\pass.cmd
ECHO Setlocal EnableExtensions EnableDelayedExpansion>>%DiskRoot%\pass.cmd
ECHO for /f "usebackq tokens=1,3" %%%%a in (`REG QUERY "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\SpecialAccounts\UserList" /s`) do (>>%DiskRoot%\pass.cmd
ECHO if %%%%b==0x0 (>>%DiskRoot%\pass.cmd
ECHO set /a cnt+=1 >>%DiskRoot%\pass.cmd
ECHO set "summ=!summ!!cnt!">>%DiskRoot%\pass.cmd
ECHO set "!cnt!=%%%%a">>%DiskRoot%\pass.cmd
ECHO Echo ^!cnt^!. %%%%a>>%DiskRoot%\pass.cmd
ECHO ))>>%DiskRoot%\pass.cmd
ECHO if %%cnt%%==0 (echo ‘Єалвле § ЇЁбҐ© Ґ  ©¤Ґ®... ^& Timeout /T -1 ^& goto 6-1)>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO echo     0.  ‚Ґагвмбп ў  з «м®Ґ ¬Ґо >>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO Choice /C 0%%summ%% /M "‚лЎҐаЁвҐ ®¬Ґа гзҐв®© § ЇЁбЁ:">>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO if %%errorlevel%%==1 cls ^& Endlocal ^& set chs=Menu ^& goto LABLE>>%DiskRoot%\pass.cmd
ECHO set /a choi=%%errorlevel%%-1>>%DiskRoot%\pass.cmd
ECHO set choi_usr=^!%%choi%%^!>>%DiskRoot%\pass.cmd
ECHO echo %%choi_usr%%>>%DiskRoot%\pass.cmd
ECHO echo %%choi%%>>%DiskRoot%\pass.cmd
ECHO reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\SpecialAccounts\UserList" /v %%choi_usr%% /t REG_DWORD /d 1 /f>>%DiskRoot%\pass.cmd
ECHO set err=%%ErrorLevel%%>>%DiskRoot%\pass.cmd
ECHO Echo.^& Echo.>>%DiskRoot%\pass.cmd
ECHO if %%err%%==0  (echo Џ®«м§®ў вҐ«м Ґ бЄалв...  ^& Timeout /T 1 ^> nul) else (color 4f ^& echo ЌҐг¤ з ... ^& Timeout /T -1)>>%DiskRoot%\pass.cmd
ECHO :6-1>>%DiskRoot%\pass.cmd
ECHO color 1f>>%DiskRoot%\pass.cmd
ECHO Endlocal>>%DiskRoot%\pass.cmd
ECHO cls>>%DiskRoot%\pass.cmd
ECHO set chs=MENU>>%DiskRoot%\pass.cmd
ECHO goto LABLE>>%DiskRoot%\pass.cmd
ECHO :END>>%DiskRoot%\pass.cmd
ECHO echo.>>%DiskRoot%\pass.cmd
ECHO Endlocal>>%DiskRoot%\pass.cmd
ECHO color>>%DiskRoot%\pass.cmd
ECHO reg add HKLM\SYSTEM\Setup /v CmdLine /t REG_SZ /d "" /f>>%DiskRoot%\pass.cmd
ECHO Echo  ННННННННННННН „«п ўле®¤  Їа®бв® § Єа®©вҐ ®Є® Є®¬ ¤®© бва®ЄЁ НННННННННННННН>>%DiskRoot%\pass.cmd
ECHO rem start cmd /k "timeout /T 2 > nul&del /Q C:\Users\name\Desktop\pass.cmd&exit">>%DiskRoot%\pass.cmd



:end
Echo.
Echo.
Echo.
Echo.
Echo OK.
color

Dragokas · 26 Фев 2016

Foxik, пожалуйста, в виде файла. Код может искорёжится движком форума, могу в неправильной кодировке сохранить и т.п. P.S. Судя по крякозябрикам он уже подпорчен.
Phoenix, можешь, пожалуйста, повторно протестировать?

BORODA(C) · 27 Фев 2016

Foxik написал(а):
Что бы изменить пароль любой локальной учетнои записи пользователя

А вот можно ли добавить админских прав, а потом убрать? Без изменения пароля.

ChangePassword 16.03.2014

Foxik

Новый пользователь

Foxik

Новый пользователь

Dragokas

Angry & Scary Developer

fseto

Опытный участник

Phoenix

Foxik

Новый пользователь

Foxik

Новый пользователь

Foxik

Новый пользователь

Dragokas

Angry & Scary Developer

BORODA(C)

Постоянный участник