[Windows] Retrouver sa clé product Windows toutes versions

Ouvrir un bloc-notes, copier/coller le script ci dessous et enregistrer au format .vbs. puis double cliquer pour l’exécuter Set WshShell = CreateObject(“WScript.Shell”) MsgBox ConvertToKey(WshShell.RegRead(“HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\DigitalProductId”)) Function ConvertToKey(Key) Const KeyOffset = 52 i = 28 Chars = “BCDFGHJKMPQRTVWXY2346789” Do Cur = 0 x = 14 Do Cur = Cur * 256 Cur = Key(x + KeyOffset) […]

Lire la suite