Récupérer le mot de passe enregistré OpenVPN

Le script Powershell dans ce lien obtient le mot de passe pour moi : Récupération de mot de passe OpenVPN

Les noms des registres sur mon ordinateur sont un peu différents; ma version:

$keys = Get-ChildItem "HKCU:\Software\OpenVPN-GUI\configs"
$items = $keys | ForEach-Object {Get-ItemProperty $_.PsPath}

foreach ($item in $items)
{
  $encryptedbytes=$item.'auth-data'
  $entropy=$item.'entropy'
  $entropy=$entropy[0..(($entropy.Length)-2)]

  $decryptedbytes = [System.Security.Cryptography.ProtectedData]::Unprotect(
    $encryptedBytes, 
    $entropy, 
    [System.Security.Cryptography.DataProtectionScope]::CurrentUser)

  Write-Host ([System.Text.Encoding]::Unicode.GetString($decryptedbytes))
}

Vous devrez peut-être également exécuter Add-Type -AssemblyName System.Security dans Powershell pour que ça fonctionne.

edit: sur windows 10, OpenVPN v11.9, $encryptedbytes=$item.'key-data'

Ma version, fonctionnant sur Windows 10/11 x64, pas de droits d'administrateur après l'exécution

*set-executionpolicy remotesigned*

*Add-Type -AssemblyName System.Security*

#openvpn-password-recovery.ps1

$keys = Get-ChildItem "HKCU:\Software\OpenVPN-GUI\configs"
$items = $keys | ForEach-Object {Get-ItemProperty $_.PsPath}

foreach ($item in $items)
{

  Write-Host ($item.'PSChildName')
  $username=$encryptedbytes=$item.'username'
  Write-Host ([System.Text.Encoding]::Unicode.GetString($username))

  $encryptedbytes=$item.'auth-data'
  $entropy=$item.'entropy'
  $entropy=$entropy[0..(($entropy.Length)-2)]

  $decryptedbytes = [System.Security.Cryptography.ProtectedData]::Unprotect(
    $encryptedBytes, 
    $entropy, 
    [System.Security.Cryptography.DataProtectionScope]::CurrentUser)

  Write-Host ([System.Text.Encoding]::Unicode.GetString($decryptedbytes))
  Write-Host (' ')

}

Ajout à la réponse d'Alex :

Vous pouvez également facilement extraire le nom d'utilisateur si nécessaire en ajoutant les deux lignes suivantes :

$username=$encryptedbytes=$item.'username'
Write-Host ([System.Text.Encoding]::Unicode.GetString($username))

Notez également qu'en fonction de la configuration de votre PowerShell, vous pourriez avoir besoin d'exécuter les deux commandes suivantes avant que le script puisse fonctionner (pour autoriser les scripts et activer les types de sécurité nécessaires pour le processus de déchiffrement) :

set-executionpolicy remotesigned 
Add-Type -AssemblyName System.Security