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

Le script Powershell dans ce lien récupère le mot de passe pour moi : Récupération du mot de passe OpenVPN

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

$clés = Get-ChildItem "HKCU:\Software\OpenVPN-GUI\configs"
$éléments = $clés | ForEach-Object {Get-ItemProperty $_.PsPath}

foreach ($élément in $éléments)
{
  $octetsencryptés=$élément.'auth-data'
  $entropie=$élément.'entropy'
  $entropie=$entropie[0..(($entropie.Longueur)-2)]

  $octetsdécryptés = [System.Security.Cryptography.ProtectedData]::Unprotect(
    $octetsencryptés, 
    $entropie, 
    [System.Security.Cryptography.DataProtectionScope]::CurrentUser)

  Write-Host ([System.Text.Encoding]::Unicode.GetString($octetsdécryptés))
}

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

éditer : sur Windows 10, OpenVPN v11.9, $octetsencryptés=$élément.'key-data'

```html

Ma version, fonctionne sur Windows 10/11 x64, sans 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 votre configuration 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écryptage):

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