Last active
July 4, 2024 16:28
-
-
Save SMSAgentSoftware/27ff318f3973b97ca6b5cb99e8c93293 to your computer and use it in GitHub Desktop.
Deletes device records in AD / AAD / Intune / Autopilot / ConfigMgr. Useful for Autopilot test deployments.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| [CmdletBinding(DefaultParameterSetName='All')] | |
| Param | |
| ( | |
| [Parameter(ParameterSetName='All',Mandatory=$true,ValueFromPipelineByPropertyName=$true,ValueFromPipeline=$true)] | |
| [Parameter(ParameterSetName='Individual',Mandatory=$true,ValueFromPipelineByPropertyName=$true,ValueFromPipeline=$true)] | |
| [string[]]$ComputerName, | |
| [Parameter(ParameterSetName='All')] | |
| [switch]$All = $True, | |
| [Parameter(ParameterSetName='Individual')] | |
| [switch]$AD, | |
| [Parameter(ParameterSetName='Individual')] | |
| [switch]$AAD, | |
| [Parameter(ParameterSetName='Individual')] | |
| [switch]$Intune, | |
| [Parameter(ParameterSetName='Individual')] | |
| [switch]$Autopilot, | |
| [Parameter(ParameterSetName='Individual')] | |
| [switch]$ConfigMgr | |
| ) | |
| <# | |
| ****************** | |
| ** REQUIREMENTS ** | |
| ****************** | |
| For AD, the host workstation must be joined to the domain and have line-of-sight to a domain controller. | |
| For ConfigMgr, the host workstation must have the ConfigMgr PowerShell module installed. | |
| For Azure AD, Intune and Autopilot, the Microsoft Graph PowerShell enterprise application with app Id 14d82eec-204b-4c2f-b7e8-296a70dab67e must have the following | |
| permissions granted with admin consent: | |
| - Directory.AccessAsUser.All (for Azure AD) | |
| - DeviceManagementManagedDevices.ReadWrite.All (for Intune) | |
| - DeviceManagementServiceConfig.ReadWrite.All (for Autopilot) | |
| For all scenarios, the user account must have the appropriate permissions to read and delete the device records. | |
| The required MS Graph modules will be installed for the user if not already present. | |
| !! Updated 2023-07-14 to use the v2 of Microsoft Graph PowerShell SDK !! | |
| #> | |
| Begin | |
| { | |
| Set-Location $env:SystemDrive | |
| # Load required modules | |
| #region Modules | |
| If ($PSBoundParameters.ContainsKey("AAD") -or $PSBoundParameters.ContainsKey("Intune") -or $PSBoundParameters.ContainsKey("Autopilot") -or $PSBoundParameters.ContainsKey("All")) | |
| { | |
| Write-Host "Importing modules" | |
| # Get NuGet | |
| $provider = Get-PackageProvider NuGet -ErrorAction Ignore | |
| if (-not $provider) | |
| { | |
| Write-Host "Installing provider NuGet..." -NoNewline | |
| try | |
| { | |
| Find-PackageProvider -Name NuGet -ForceBootstrap -IncludeDependencies -Force -ErrorAction Stop | |
| Write-Host "Success" -ForegroundColor Green | |
| } | |
| catch | |
| { | |
| Write-Host "Failed" -ForegroundColor Red | |
| throw $_.Exception.Message | |
| return | |
| } | |
| } | |
| $module = Import-Module Microsoft.Graph.Identity.DirectoryManagement -PassThru -ErrorAction Ignore | |
| if (-not $module) | |
| { | |
| Write-Host "Installing module Microsoft.Graph.Identity.DirectoryManagement..." -NoNewline | |
| try | |
| { | |
| Install-Module Microsoft.Graph.Identity.DirectoryManagement -Scope CurrentUser -Force -ErrorAction Stop | |
| Write-Host "Success" -ForegroundColor Green | |
| } | |
| catch | |
| { | |
| Write-Host "Failed" -ForegroundColor Red | |
| throw $_.Exception.Message | |
| return | |
| } | |
| } | |
| $module = Import-Module Microsoft.Graph.DeviceManagement -PassThru -ErrorAction Ignore | |
| if (-not $module) | |
| { | |
| Write-Host "Installing module Microsoft.Graph.DeviceManagement..." -NoNewline | |
| try | |
| { | |
| Install-Module Microsoft.Graph.DeviceManagement -Scope CurrentUser -Force -ErrorAction Stop | |
| Write-Host "Success" -ForegroundColor Green | |
| } | |
| catch | |
| { | |
| Write-Host "Failed" -ForegroundColor Red | |
| throw $_.Exception.Message | |
| return | |
| } | |
| } | |
| $module = Import-Module Microsoft.Graph.DeviceManagement.Enrollment -PassThru -ErrorAction Ignore | |
| if (-not $module) | |
| { | |
| Write-Host "Installing module Microsoft.Graph.DeviceManagement.Enrollment..." -NoNewline | |
| try | |
| { | |
| Install-Module Microsoft.Graph.DeviceManagement.Enrollment -Scope CurrentUser -Force -ErrorAction Stop | |
| Write-Host "Success" -ForegroundColor Green | |
| } | |
| catch | |
| { | |
| Write-Host "Failed" -ForegroundColor Red | |
| throw $_.Exception.Message | |
| return | |
| } | |
| } | |
| } | |
| If ($PSBoundParameters.ContainsKey("ConfigMgr") -or $PSBoundParameters.ContainsKey("All")) | |
| { | |
| $SMSEnvVar = [System.Environment]::GetEnvironmentVariable('SMS_ADMIN_UI_PATH') | |
| If ($SMSEnvVar) | |
| { | |
| $ModulePath = $SMSEnvVar.Replace('i386','ConfigurationManager.psd1') | |
| if ([System.IO.File]::Exists($ModulePath)) | |
| { | |
| try | |
| { | |
| Import-Module $ModulePath -ErrorAction Stop | |
| } | |
| catch | |
| { | |
| throw "Failed to import ConfigMgr module: $($_.Exception.Message)" | |
| } | |
| } | |
| else | |
| { | |
| throw "ConfigMgr module not found" | |
| } | |
| } | |
| else | |
| { | |
| throw "SMS_ADMIN_UI_PATH environment variable not found" | |
| } | |
| } | |
| #endregion | |
| #region Auth | |
| If ($PSBoundParameters.ContainsKey("AAD") -or $PSBoundParameters.ContainsKey("Intune") -or $PSBoundParameters.ContainsKey("Autopilot") -or $PSBoundParameters.ContainsKey("All")) | |
| { | |
| Write-Host "Authenticating..." -NoNewline | |
| try | |
| { | |
| $null = Connect-MgGraph -Scopes "Directory.AccessAsUser.All","DeviceManagementManagedDevices.ReadWrite.All","DeviceManagementServiceConfig.ReadWrite.All" -ErrorAction Stop | |
| #$null = Connect-MgGraph -Scopes "Directory.AccessAsUser.All","DeviceManagementServiceConfig.ReadWrite.All" -ErrorAction Stop | |
| Write-Host "Success" -ForegroundColor Green | |
| } | |
| catch | |
| { | |
| Write-Host "Failed" -ForegroundColor Red | |
| throw $_.Exception.Message | |
| } | |
| } | |
| #endregion | |
| } | |
| Process | |
| { | |
| foreach ($Computer in $ComputerName) | |
| { | |
| Write-Host "===============" | |
| Write-host "$($Computer.ToUpper())" | |
| Write-Host "===============" | |
| #region AD | |
| If ($PSBoundParameters.ContainsKey("AD") -or $PSBoundParameters.ContainsKey("All")) | |
| { | |
| Try | |
| { | |
| Write-host "Locating device in " -NoNewline | |
| Write-host "Active Directory" -ForegroundColor Blue -NoNewline | |
| Write-Host "..." -NoNewline | |
| $Searcher = [ADSISearcher]::new() | |
| $Searcher.Filter = "(sAMAccountName=$Computer`$)" | |
| [void]$Searcher.PropertiesToLoad.Add("distinguishedName") | |
| $ComputerAccount = $Searcher.FindOne() | |
| If ($ComputerAccount) | |
| { | |
| Write-host "Success" -ForegroundColor Green | |
| Write-Host "Removing device from" -NoNewline | |
| Write-Host "Active Directory" -NoNewline -ForegroundColor Blue | |
| Write-Host "..." -NoNewline | |
| $DirectoryEntry = $ComputerAccount.GetDirectoryEntry() | |
| $Result = $DirectoryEntry.DeleteTree() | |
| Write-Host "Success" -ForegroundColor Green | |
| } | |
| Else | |
| { | |
| Write-host "Fail" -ForegroundColor Red | |
| Write-Warning "Device not found in Active Directory" | |
| } | |
| } | |
| Catch | |
| { | |
| Write-host "Fail" -ForegroundColor Red | |
| Write-Error "$($_.Exception.Message)" | |
| } | |
| } | |
| #endregion | |
| #region AzureAD | |
| If ($PSBoundParameters.ContainsKey("AAD") -or $PSBoundParameters.ContainsKey("All")) | |
| { | |
| Write-Host "Locating device in" -NoNewline | |
| Write-Host " Azure AD" -NoNewline -ForegroundColor Yellow | |
| Write-Host "..." -NoNewline | |
| try | |
| { | |
| $AADDevice = Get-MgDevice -Search "displayName:$Computer" -CountVariable CountVar -ConsistencyLevel eventual -ErrorAction Stop | |
| } | |
| catch | |
| { | |
| Write-Host "Fail" -ForegroundColor Red | |
| Write-Error "$($_.Exception.Message)" | |
| $LocateInAADFailure = $true | |
| } | |
| If ($LocateInAADFailure -ne $true) | |
| { | |
| If ($AADDevice.Count -eq 1) | |
| { | |
| Write-Host "Success" -ForegroundColor Green | |
| Write-Host " DisplayName: $($AADDevice.DisplayName)" | |
| Write-Host " ObjectId: $($AADDevice.Id)" | |
| Write-Host " DeviceId: $($AADDevice.DeviceId)" | |
| Write-Host "Removing device from" -NoNewline | |
| Write-Host " Azure AD" -NoNewline -ForegroundColor Yellow | |
| Write-Host "..." -NoNewline | |
| try | |
| { | |
| $Result = Remove-MgDevice -DeviceId $AADDevice.Id -PassThru -ErrorAction Stop | |
| If ($Result -eq $true) | |
| { | |
| Write-Host "Success" -ForegroundColor Green | |
| } | |
| else | |
| { | |
| Write-Host "Fail" -ForegroundColor Red | |
| } | |
| } | |
| catch | |
| { | |
| Write-Host "Fail" -ForegroundColor Red | |
| Write-Error "$($_.Exception.Message)" | |
| } | |
| } | |
| ElseIf ($AADDevice.Count -gt 1) | |
| { | |
| Write-Host "Fail" -ForegroundColor Red | |
| Write-Warning "Multiple devices found in Azure AD. The device display name must be unique." | |
| } | |
| else | |
| { | |
| Write-Host "Fail" -ForegroundColor Red | |
| Write-Warning "Device not found in Azure AD" | |
| } | |
| } | |
| } | |
| #endregion | |
| #region Intune | |
| If ($PSBoundParameters.ContainsKey("Intune") -or $PSBoundParameters.ContainsKey("Autopilot") -or $PSBoundParameters.ContainsKey("All")) | |
| { | |
| Write-Host "Locating device in" -NoNewline | |
| Write-Host " Intune" -NoNewline -ForegroundColor Cyan | |
| Write-Host "..." -NoNewline | |
| try | |
| { | |
| $IntuneDevice = Get-MgDeviceManagementManagedDevice -Filter "deviceName eq '$Computer'" -ErrorAction Stop | |
| } | |
| catch | |
| { | |
| Write-Host "Fail" -ForegroundColor Red | |
| Write-Error "$($_.Exception.Message)" | |
| $LocateInIntuneFailure = $true | |
| } | |
| If ($LocateInIntuneFailure -ne $true) | |
| { | |
| If ($IntuneDevice.Count -eq 1) | |
| { | |
| Write-Host "Success" -ForegroundColor Green | |
| Write-Host " DeviceName: $($IntuneDevice.DeviceName)" | |
| Write-Host " ObjectId: $($IntuneDevice.Id)" | |
| Write-Host " AzureAdDeviceId: $($IntuneDevice.AzureAdDeviceId)" | |
| Write-Host "Removing device from" -NoNewline | |
| Write-Host " Intune" -NoNewline -ForegroundColor Cyan | |
| Write-Host "..." -NoNewline | |
| try | |
| { | |
| $Result = Remove-MgDeviceManagementManagedDevice -ManagedDeviceId $IntuneDevice.Id -PassThru -ErrorAction Stop | |
| If ($Result -eq $true) | |
| { | |
| Write-Host "Success" -ForegroundColor Green | |
| } | |
| else | |
| { | |
| Write-Host "Fail" -ForegroundColor Red | |
| } | |
| } | |
| catch | |
| { | |
| Write-Host "Fail" -ForegroundColor Red | |
| Write-Error "$($_.Exception.Message)" | |
| } | |
| } | |
| ElseIf ($IntuneDevice.Count -gt 1) | |
| { | |
| Write-Host "Fail" -ForegroundColor Red | |
| Write-Warning "Multiple devices found in Intune. The device display name must be unique." | |
| } | |
| else | |
| { | |
| Write-Host "Fail" -ForegroundColor Red | |
| Write-Warning "Device not found in Intune" | |
| } | |
| } | |
| } | |
| #endregion | |
| #region Autopilot | |
| If (($PSBoundParameters.ContainsKey("Autopilot") -or $PSBoundParameters.ContainsKey("All")) -and $IntuneDevice.Count -eq 1) | |
| { | |
| Write-Host "Locating device in" -NoNewline | |
| Write-Host " Windows Autopilot" -NoNewline -ForegroundColor Cyan | |
| Write-Host "..." -NoNewline | |
| try | |
| { | |
| $AutopilotDevice = Get-MgDeviceManagementWindowsAutopilotDeviceIdentity -Filter "contains(serialNumber,'$($IntuneDevice.SerialNumber)')" -ErrorAction Stop | |
| #$Response = Invoke-MgGraphRequest -Method GET -Uri "https://graph.microsoft.com/v1.0/deviceManagement/windowsAutopilotDeviceIdentities?`$filter=contains(serialNumber,'$SerialNumber')" -ErrorAction Stop | |
| } | |
| catch | |
| { | |
| Write-Host "Fail" -ForegroundColor Red | |
| Write-Error "$($_.Exception.Message)" | |
| $LocateInAutopilotFailure = $true | |
| } | |
| If ($LocateInAutopilotFailure -ne $true) | |
| { | |
| If ($AutopilotDevice.Count -eq 1) | |
| { | |
| Write-Host "Success" -ForegroundColor Green | |
| Write-Host " SerialNumber: $($AutopilotDevice.SerialNumber)" | |
| Write-Host " Id: $($AutopilotDevice.Id)" | |
| Write-Host " ManagedDeviceId: $($AutopilotDevice.ManagedDeviceId)" | |
| Write-Host " Model: $($AutopilotDevice.Model)" | |
| Write-Host " GroupTag: $($AutopilotDevice.GroupTag)" | |
| Write-Host "Removing device from" -NoNewline | |
| Write-Host " Windows Autopilot" -NoNewline -ForegroundColor Cyan | |
| Write-Host "..." -NoNewline | |
| try | |
| { | |
| $Result = Remove-MgDeviceManagementWindowsAutopilotDeviceIdentity -WindowsAutopilotDeviceIdentityId $AutopilotDevice.Id -PassThru -ErrorAction Stop | |
| If ($Result -eq $true) | |
| { | |
| Write-Host "Success" -ForegroundColor Green | |
| } | |
| else | |
| { | |
| Write-Host "Fail" -ForegroundColor Red | |
| } | |
| } | |
| catch | |
| { | |
| Write-Host "Fail" -ForegroundColor Red | |
| Write-Error "$($_.Exception.Message)" | |
| } | |
| } | |
| ElseIf ($AutopilotDevice.Count -gt 1) | |
| { | |
| Write-Host "Fail" -ForegroundColor Red | |
| Write-Warning "Multiple devices found in Windows Autopilot. The serial number must be unique." | |
| Continue | |
| } | |
| else | |
| { | |
| Write-Host "Fail" -ForegroundColor Red | |
| Write-Warning "Device not found in Windows Autopilot" | |
| } | |
| } | |
| } | |
| #endregion | |
| #region ConfigMgr | |
| If ($PSBoundParameters.ContainsKey("ConfigMgr") -or $PSBoundParameters.ContainsKey("All")) | |
| { | |
| Write-host "Locating device in " -NoNewline | |
| Write-host "ConfigMgr " -ForegroundColor Magenta -NoNewline | |
| Write-host "..." -NoNewline | |
| Try | |
| { | |
| $SiteCode = (Get-PSDrive -PSProvider CMSITE -ErrorAction Stop).Name | |
| Set-Location ("$SiteCode" + ":") -ErrorAction Stop | |
| [array]$ConfigMgrDevices = Get-CMDevice -Name $Computer -Fast -ErrorAction Stop | |
| } | |
| Catch | |
| { | |
| Write-Host "Fail" -ForegroundColor Red | |
| Write-Error "$($_.Exception.Message)" | |
| $LocateInConfigMgrFailure = $true | |
| } | |
| If ($LocateInConfigMgrFailure -ne $true) | |
| { | |
| If ($ConfigMgrDevices.count -eq 1) | |
| { | |
| $ConfigMgrDevice = $ConfigMgrDevices[0] | |
| Write-Host "Success" -ForegroundColor Green | |
| Write-Host " ResourceID: $($ConfigMgrDevice.ResourceID)" | |
| Write-Host " SMSID: $($ConfigMgrDevice.SMSID)" | |
| Write-Host " UserDomainName: $($ConfigMgrDevice.UserDomainName)" | |
| Write-Host "Removing device from" -NoNewline | |
| Write-Host " ConfigMgr" -NoNewline -ForegroundColor Magenta | |
| Write-Host "..." -NoNewline | |
| try | |
| { | |
| Remove-CMDevice -InputObject $ConfigMgrDevice -Force -ErrorAction Stop | |
| Write-Host "Success" -ForegroundColor Green | |
| } | |
| catch | |
| { | |
| Write-Host "Fail" -ForegroundColor Red | |
| Write-Error "$($_.Exception.Message)" | |
| } | |
| } | |
| ElseIf ($ConfigMgrDevices.Count -gt 1) | |
| { | |
| Write-Host "Fail" -ForegroundColor Red | |
| Write-Warning "Multiple devices found in ConfigMgr The device name must be unique." | |
| Continue | |
| } | |
| else | |
| { | |
| Write-Host "Fail" -ForegroundColor Red | |
| Write-Warning "Device not found in ConfigMgr" | |
| } | |
| } | |
| } | |
| #endregion | |
| } | |
| } | |
| End | |
| { | |
| Set-Location $env:SystemDrive | |
| If ($PSBoundParameters.ContainsKey("AAD") -or $PSBoundParameters.ContainsKey("Intune") -or $PSBoundParameters.ContainsKey("Autopilot") -or $PSBoundParameters.ContainsKey("All")) | |
| { | |
| $null = Disconnect-MgGraph -ErrorAction SilentlyContinue | |
| } | |
| } |
Hi - great script, but I am currently having difficulty with removing devices from Intune - everything else is working a treat!
If I run the line to just remove from Intune:
.\Delete-DeviceRecords.ps1 -ComputerName MyPC -Intune
I get the following:
MyPC
Locating device in Intune...Fail
C:\Intune Files\Scripts\Maintenance\Delete-DeviceRecords.ps1 : [InternalServerError] : {
"_version": 3,
"Message": "An internal server error has occurred - Operation ID (for customer support):
00000000-0000-0000-0000-000000000000 - Activity ID: e73e2374-5ee2-46f5-bcb7-7dcf797c224b - Url: https://fef.msub01.mana
ge.microsoft.com/DeviceFE/StatelessDeviceFEService/deviceManagement/managedDevices?api-version=2023-10-19&$filter=devic
eName+eq+%27MyPC%27",
"CustomApiErrorPhrase": "",
"RetryAfter": null,
"ErrorSourceService": "",
"HttpHeaders": "{}"
}
At line:1 char:1
- .\Delete-DeviceRecords.ps1 -ComputerName MyPC -Intune
-
+ CategoryInfo : NotSpecified: (:) [Write-Error], WriteErrorException + FullyQualifiedErrorId : Microsoft.PowerShell.Commands.WriteErrorException,Delete-DeviceRecords.ps1
The device does exist in Intune. I can use the normal command from the same PS window to remove it
Remove-MgDeviceManagementManagedDevice -ManagedDeviceId xxxxxxxxxxxx
Curious. I couldn't reproduce that error. Is there something strange about the real device name?
No, nothing at all. It did used to work too! Do I need a specific version of any of the modules, as I think I used to use it on an older machine
It is this line that is generating the problem $IntuneDevice = Get-MgDeviceManagementManagedDevice -Filter "deviceName eq 'devicename'" -ErrorAction Stop
I changed the variable to the actual device name and got the same fault. Very odd. Tried on a different device and let the script install all the modules.
I have the same result too. One correct device name and one with a completely different name and object. I understand instances where the device has an old record and a new one with the same name. But that’s not the case. I opened an issue with Microsoft on this get-MgDeviceManagementManagedDevice. Thank goodness your script returns an error if more than one is found or else I’d be having users wondering why their devices are not working correctly because their device got deleted by mistake.
Interesting...possibly a bug with the Get-MgDeviceManagementManagedDevice cmdlet in a certain module version then? I still have 2.12.0 of the Microsoft.Graph.DeviceManagement module installed and don't get any errors. Seems like the current version is 2.19.0.
I did have the same version, so I ended up deleting all the graph modules then ran the script again from a new PS session. It reinstalled everything and worked! Bit odd but that's computers for you. Thanks for the script. Working great!
Is anyone else having issues with devices being removed from Azure AD? I have deleted all graph modules and run the script again.
Removing device from Azure AD...Fail
Write-Error: [Authorization_RequestDenied] : Insufficient privileges to complete the operation.
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment
ah i seee, thanks