@echo off
setlocal enabledelayedexpansion

set "mainDir=C:\path\to\main"
set "7zPath=C:\Program Files\7-Zip\7z.exe"

for /D %%f in ("%mainDir%\*") do (
    echo Processing folder: %%f
    set "folderPath=%%f"
    set "archiveName=%%~nf"
    set "archivePath=%mainDir%\!archiveName!"

    echo Creating archive at: !archivePath!.zip
    "!7zPath!" a -tzip "!archivePath!.zip" "!folderPath!\*"
)

endlocal

# Список пользователей для блокировки
$userList = @("user1", "user2", "user3")

Import-Module ActiveDirectory

foreach ($user in $userList) {
    $adUser = Get-ADUser -Identity $user
    if ($adUser -ne $null) {
        # Блокировка учетной записи пользователя
        Set-ADAccountExpiration -Identity $adUser -DateTime ((Get-Date).AddDays(-1)) -Verbose
        
        # Отключение учетной записи пользователя
        Disable-ADAccount -Identity $adUser -Verbose
        
        Write-Host "Учетная запись пользователя $user заблокирована и отключена."
    } else {
        Write-Host "Не удалось найти пользователя $user."
    }
}