删除AD用户及配置文件的PowerShell脚本报错及日志功能咨询

# 导入AD模块，缺少模块会直接抛出错误
Import-Module ActiveDirectory -ErrorAction Stop

# 配置路径和日志路径
$Username = Read-Host -Prompt '请输入要删除的用户名'
$HomeDirectory = '\\server\user'
$ProfilePath = '\\server\profiles'
$TsProfiles = '\\server\tsprofiles'
$logPath = "C:\AD清理日志\DeleteADUser_$(Get-Date -Format 'yyyyMMdd_HHmmss').log"

# 提前创建日志目录
$logDir = Split-Path $logPath -Parent
if (-not (Test-Path $logDir)) {
    New-Item -ItemType Directory -Path $logDir -Force | Out-Null
}

# 日志写入通用函数
function Write-Log {
    param([string]$Message)
    $logContent = "[$(Get-Date -Format 'yyyy-MM-dd HH:mm:ss')] $Message"
    Add-Content -Path $logPath -Value $logContent
    Write-Host $logContent
}

foreach ($user in $Username) {
    Write-Log "===== 开始处理用户 $user ====="

    # 1. 处理AD账号
    $adUser = Get-ADUser -Filter {SamAccountName -eq $user} -ErrorAction SilentlyContinue
    if ($adUser) {
        try {
            Remove-ADUser -Identity $adUser -Confirm:$false -ErrorAction Stop
            Write-Log "** AD账号 $user 已成功删除 **"
        }
        catch {
            Write-Log "!! AD账号 $user 删除失败：$($_.Exception.Message)"
        }
    }
    else {
        Write-Log "** AD账号 $user 不存在，跳过删除 **"
    }

    # 2. 处理HomeDirectory
    $userHomePath = Join-Path $HomeDirectory $user
    if (Test-Path $userHomePath) {
        try {
            Remove-Item $userHomePath -Recurse -Force -Verbose -WhatIf -ErrorAction Stop
            Write-Log "** HomeDirectory of $user deleted **"
        }
        catch {
            Write-Log "!! HomeDirectory of $user 删除失败：$($_.Exception.Message)"
        }
    }
    else {
        Write-Log "** HomeDirectory for $user not found **"
    }

    # 3. 处理ProfilePath
    $userProfilePath = Join-Path $ProfilePath $user
    if (Test-Path $userProfilePath) {
        try {
            Remove-Item -Path $userProfilePath -Recurse -Force -Verbose -WhatIf -ErrorAction Stop
            Write-Log "** ProfilePath of $user deleted **"
        }
        catch {
            Write-Log "!! ProfilePath of $user 删除失败：$($_.Exception.Message)"
        }
    }
    else {
        Write-Log "** ProfilePath for $user not found **"
    }

    # 4. 处理TsProfiles
    $userTsPath = "$TsProfiles\$user*"
    if (Test-Path $userTsPath) {
        try {
            Remove-Item $userTsPath -Recurse -Force -Verbose -WhatIf -ErrorAction Stop
            Write-Log "** TsProfiles of $user deleted **"
        }
        catch {
            Write-Log "!! TsProfiles of $user 删除失败：$($_.Exception.Message)"
        }
    }
    else {
        Write-Log "** TsProfiles for $user not found **"
    }

    Write-Log "===== 用户 $user 处理完成 =====`n"
}

• 新增通用日志写入函数，所有操作记录自动携带时间戳，日志按执行时间命名不会覆盖历史记录，同时支持日志文件写入和控制台实时输出
• 每个操作前先校验目标对象是否存在，不存在直接输出对应提示到日志，完全避免了路径不存在、AD账号不存在的报错
• 合并了原脚本多次遍历用户名的逻辑，单次循环即可完成所有关联资源的处理，执行效率更高
• 新增异常捕获机制，遇到权限不足、文件被占用等特殊删除失败场景时，会将错误原因写入日志，不会直接中断脚本运行
• 保留了原脚本的-WhatIf测试参数，测试阶段只会模拟删除不会操作实际数据，确认逻辑符合预期后删除所有命令后的-WhatIf参数即可正式执行删除

• 脚本需要在安装了ActiveDirectory PowerShell模块的设备上运行，域控制器默认已安装该模块，普通服务器/工作站需要安装RSAT-AD-PowerShell组件
• 日志存储路径默认设置为C:\AD清理日志，可根据实际需求修改$logPath变量自定义存储位置

内容的提问来源于stack exchange，提问作者Juggybash