Powershell script to get each VM, and list its disks, and list the chain of differencing disks for each one

GetVMHardDiskParents.ps1

Foreach ($VM in Get-VM){
 Write-Output $VM.name
 Foreach ($HardDrive in $VM.HardDrives){
  $VHDPath = $HardDrive.path
  Do {
   Write-Output ("- " + $VHDPath)
   $VHDPath = (Get-VHD -Path $VHDPath).ParentPath
  } While ($VHDPath)
 }
}