EPM : Suppression de doublons Ordinateurs migration Core Server

# http://localhost/MBSDKService/MsgSDK.asmx?WSDL/GetMachineData

$mycreds = Get-Credential -Credential "Domaine\compte"

$ldWSold    = New-WebServiceProxy -uri http://ivanh0cms01.dkcorp.net/MBSDKService/MsgSDK.asmx -Credential $mycreds
$ListOlds   = $ldWSold.ListMachines("").Devices

$ldWSNew    = New-WebServiceProxy -uri https://ivanh0cms03.dkcorp.net/MBSDKService/MsgSDK.asmx -Credential $mycreds
$ListNews   = $ldWSNew.ListMachines("").Devices
 
#GUID                                   DeviceName      DomainName           LastLogin
foreach ($ListOld in $ListOlds) {
    foreach ($ListNew in $ListNews) {
		If ($ListNew.DeviceName -notlike "ivanh0cms*") {
			If ($ListOld.DeviceName -eq $ListNew.DeviceName) {
				If ($ListOld.GUID -ne "Unassigned") {
					write-host $ListOld.DeviceName "=>" $ListOld.GUID				
					$ldWSold.DeleteComputerByGUID($ListOld.GUID)
				}
			}
		}
    }
}