param ([String]$Path)

try
{
    # Get a drive letter between F and Y that is not being used for the drive name.
    $driveLetter = [char[]](70..89) | Where-Object {$_ -notin (Get-PSDrive).Name} | Select-Object -Last 1

    $dir = New-Item $Path -ItemType Directory -Force

    # Create virtual drive pointing to the parent of the directory
    subst.exe "$driveLetter`:" $dir.Parent.FullName
    $exitCode = $LASTEXITCODE
    if ($exitCode -ne 0) { Write-Error "Creating drive with subst.exe failed with exit code $exitCode" }

    $root = [String]::Format('{0}:\', $driveLetter)
    $pathToCheck = Join-Path -Path $root -ChildPath $dir.Name

    if (Test-Path $pathToCheck)
    {
        "Drive found"
        if (-not (Get-PSDrive -Name $driveLetter -Scope Global -ErrorAction SilentlyContinue))
        {
            Write-Error "Drive is NOT in Global scope"
        }
    }
    else { Write-Error "$pathToCheck not found" }
}
finally
{
    subst.exe "$driveLetter`:" /d
}
