Archive dans décembre 2018

Comment récupérer sa clé windows 10 ?

Comment récupérer sa clé windows 10 ?

    Voici le code à copier dans le bloc note :   ************************* 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) + Cur Key(x +

Lire la suite