Comment puis-je avoir ma clef Windows 7 ? ex : G598H-G7T88-GT8UI-K5D8A-98YI2
Page 1 sur 1
Comment puis-je avoir ma clef Windows 7 ? ex : G598H-G7T88-GT8UI-K5D8A-98YI2
Alors, je suis sûr que comme beaucoup de personnes vous ne disposez pas toujours de votre clef Windows sous la main lol bas voilà la petite astuce qui ma servie chez certaines personnes mainte et mainte fois
Alors pour faire au plus simple dans un premier temps :
-Sur votre bureau clic droit et créé un dossier txt ( clic droit/nouveau/Document texte )
-Ensuite clique gauche sur Sélectionner le contenu à droite du code que je vous donne et clic droit copier et coller le dans le document texte :
-Ensuite cliquez sur le menu fichier puis sur enregistrer sous
-Déroulez ensuite la liste type et sélectionnez l'option tous les fichiers (*.*), très important !
-Ensuite donnez un nom au document texte suivi de l'extension .vbs, ex : MaCléWindows.vbs , puis enregistrer votre fichier ou vous le désirez.
-Fermez le document texte, et pour connaître votre clé produit, double cliquez simplement sur le fichier MaCléWindows.vbs la ou vous l'avez mis.
-La clé de votre produit Windows est affichée à l'écran, juste à la recopier ou à faire un copier/coller
et voilà
Alors pour faire au plus simple dans un premier temps :
-Sur votre bureau clic droit et créé un dossier txt ( clic droit/nouveau/Document texte )
-Ensuite clique gauche sur Sélectionner le contenu à droite du code que je vous donne et clic droit copier et coller le dans le document texte :
- Code:
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
-Ensuite cliquez sur le menu fichier puis sur enregistrer sous
-Déroulez ensuite la liste type et sélectionnez l'option tous les fichiers (*.*), très important !
-Ensuite donnez un nom au document texte suivi de l'extension .vbs, ex : MaCléWindows.vbs , puis enregistrer votre fichier ou vous le désirez.
-Fermez le document texte, et pour connaître votre clé produit, double cliquez simplement sur le fichier MaCléWindows.vbs la ou vous l'avez mis.
-La clé de votre produit Windows est affichée à l'écran, juste à la recopier ou à faire un copier/coller
et voilà
Sujets similaires
» Windows 10 : vers la fin du mot de passe ?
» Windows Update RESOLU
» Faire apparaitre ou non les extensions de fichiers (Windows 7 )
» Raccourcis clavier, passer vos fenêtres en 3D (Windows 7)
» Installer un deuxième mot de passe au lancement de Windows(7)
» Windows Update RESOLU
» Faire apparaitre ou non les extensions de fichiers (Windows 7 )
» Raccourcis clavier, passer vos fenêtres en 3D (Windows 7)
» Installer un deuxième mot de passe au lancement de Windows(7)
Page 1 sur 1
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum
|
|