Astuces ⇒ Windows 10 facebook twitter youtube

Retrouver la clé de Windows | Retrouver la clé de Windows


Ouvrez le bloc-notes en cliquant sur son raccourci dans le menu démarrer.

Recopiez-y le code suivant.

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 + KeyOffset) = (Cur \ 24) And 255
Cur = Cur Mod 24
x = x -1
Loop While x >= 0
i = i -1
KeyOutput = Mid(Chars, Cur + 1, 1) & KeyOutput
If (((29 - i) Mod 6) = 0) And (i <> -1) Then
i = i -1
KeyOutput = "-" & KeyOutput
End If
Loop While i >= 0
ConvertToKey = KeyOutput
End Function

Cliquez sur le menu Fichier puis sur Enregistrer sous.

Déroulez la liste Type et sélectionnez l'option Tous les fichiers (*.*).

Donnez un nom au script en le suivant de l'extension .vbs, Clé.vbs par exemple

Choisissez l'endroit où enregistrer le fichier, sur le Bureau par exemple pour plus de simplicité et cliquez sur Enregistrer.

Fermez le bloc-notes. Pour connaître votre clé produit, double cliquez simplement sur le fichier Clé.vbs sur votre Bureau.

La clé produit de Windows est affichée à l'écran. Notez-la. Vous pouvez aussi la copier avec le raccourci clavier Ctrl + C puis la coller dans un document avec le raccourci clavier Ctrl + V





>
Changer le fond
Oregionale Skin
7astuces
Sélectionnez un Fond (11)
7astuces 7astuces 7astuces 7astuces 7astuces 7astuces 7astuces 7astuces 7astuces 7astuces 7astuces
Fond de contenu
7astuces 7astuces 7astuces 7astuces 7astuces 7astuces 7astuces 7astuces 7astuces 7astuces 7astuces 7astuces 7astuces 7astuces 7astuces 7astuces 7astuces 7astuces 7astuces 7astuces