Можно ли удалить пользователя AD и связанные с ним папки? Структура папок:

D:\Users\Profiles
D:\Users\Redirect
D:\Users\Data

Я пытаюсь использовать следующий скрипт, который удаляет пользователей, которые не вошли в систему в течение 90 дней. Это НЕ то, что я хочу.

function Delete-ADUser
{
    Param($userName = $(throw 'Enter a username to delete'))
    $searcher = New-Object System.DirectoryServices.DirectorySearcher([ADSI]"","(&(objectcategory=user)(sAMAccountName=$userName))")
    $user = $searcher.findone().GetDirectoryEntry()
    $user.psbase.DeleteTree()
}


$NumDays = 90
$LogDir = ".\Removed-User-Accounts.log"

$currentDate = [System.DateTime]::Now
$currentDateUtc = $currentDate.ToUniversalTime()
$lltstamplimit = $currentDateUtc.AddDays(- $NumDays)
$lltIntLimit = $lltstampLimit.ToFileTime()
$adobjroot = [adsi]''
$objstalesearcher = New-Object System.DirectoryServices.DirectorySearcher($adobjroot)
$objstalesearcher.filter = "(&(objectCategory=person)(objectClass=user)(lastLogonTimeStamp<=" + $lltIntLimit + "))"
$users = $objstalesearcher.findone()

Write-Output `n`n"----------------------------------------" "ACCOUNTS OLDER THAN "$NumDays" DAYS" "PROCESSED ON:" $currentDate "----------------------------------------" `
| Out-File $LogDir -append

if ($users.Count -eq 0)
{
       Write-Output "  No account needs to be removed." | Out-File $LogDir -append
}
else
{
       foreach ($user in $users)
       {
              # Read the user properties
              [string]$adsPath = $user.Properties.adspath
              [string]$displayName = $user.Properties.displayname
              [string]$samAccountName = $user.Properties.samaccountname
              [string]$lastLogonInterval = $user.Properties.lastlogontimestamp

              # Delete the user
              Delete-ADUser $samAccountName

              # Convert the date and time to the local time zone
              $lastLogon = [System.DateTime]::FromFileTime($lastLogonInterval)

              Write-Output "  Removed user " $displayName" | Username: "$samAccountName" | Last Logon: "$lastLogon"`n" `
              | Out-File $LogDir -append
       }
}

Вопрос: Как мне изменить скрипт, который будет запрашивать у меня имя пользователя для входа и удалять его папки?

2 ответа2

1

Предполагается, что вы запускаете это на "addServer", поэтому $ profilePath является локальным для компьютера, а D:\Profiles\username хранит профиль пользователя.

$GoodbyeList = 'JDoe', 'KDoe', 'LDoe'
$profilePath = 'D:\Profiles'

foreach ($user in $GoodbyeList) {
    Remove-ADUser -Identity $user
    Remove-Item "$profilePath\$user" -Recurse -Force -Verbose
}
0

если ваши пользователи не имеют общего корневого расположения для домашних каталогов, вы можете запросить атрибуты домашнего каталога для каждого пользователя перед удалением папок

foreach ($ user in $ GoodbyeList) {Remove-ADUser -Identity $ user $ homeDirectory = (Get-ADUser $ user -Properties homeDirectory | Select-Object -ExpandProperty homeDirectory) Remove-Item "$ homeDirectory" -Recurse -Force -Verbose}

Всё ещё ищете ответ? Посмотрите другие вопросы с метками .