@echo off
REM Attention encodage OEM-850
:checkadmin
net session > NUL 2>&1
if %errorlevel% EQU 0 goto start
echo LE SCRIPT N'EST PAS LANC� EN TANT QU'ADMINISTRATEUR !
pause > nul
exit 

:start
cls
echo Saisir le nom d'utilisateur
set /p user="> "
echo.

rem Controle de l'existence de l'user
net user %user% > NUL 2>&1
if %errorlevel% EQU 0 goto next
echo L'utilisateur %user% n'existe pas.
pause > nul
goto start

:next
echo Creation du dossier ...
mkdir %~dp0\%user%
echo.

echo D‚finition du propri‚taire ...
icacls %~dp0\%user% /setowner %user% /T
echo.

echo D‚sactivation de l'h‚ritage ...
icacls %~dp0\%user% /inheritance:d
echo.

echo Modification des droits ...
icacls %~dp0\%user% /grant %user%:(OI)(CI)(NP)(F)
icacls %~dp0\%user% /grant "Administrateurs":(OI)(CI)(F)
icacls %~dp0\%user% /remove "Tout le monde"
icacls %~dp0\%user% /remove "Utilisateurs authentifi‚s"
echo.

echo Les droits ont bien ‚t‚ appliqu‚ pour l'utilisateur %user%
echo.
pause
exit