Derniers sujets
Windows : Trouver sa clé de licence Microsoft
Page 1 sur 1
Windows : Trouver sa clé de licence Microsoft
Bonjour à toutes et à tous,
Difficulté : Difficile (Confirmé nécessite une connaissance en script VBS et MS-DOS)
Nous savons tous que depuis la fin de Windows 7 Microsoft s'est engagé à ne plus donner les clés d'activations...
Alors voici par plusieurs moyen de la retrouver.
Par un bon *mot censuré par Admin* VBS : (Copiez le code et collez le dans un bloc note et enregistrez le dans votre bureau avec la mention [.VBS] à la fin.)
Dans l'invite de commande ADMIN :
Copiez collez ça dans l'invite de commande :
Par un logiciel :
x64
x86
Microsoft nous propose de leur téléphoner et de leur envoyer la facture d'achat d'un ordinateur.
Il répondrons avec la clé de produit Microsoft
Difficulté : Difficile (Confirmé nécessite une connaissance en script VBS et MS-DOS)
Nous savons tous que depuis la fin de Windows 7 Microsoft s'est engagé à ne plus donner les clés d'activations...
Alors voici par plusieurs moyen de la retrouver.
Par un bon *mot censuré par Admin* VBS : (Copiez le code et collez le dans un bloc note et enregistrez le dans votre bureau avec la mention [.VBS] à la fin.)
- 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
Dans l'invite de commande ADMIN :
Copiez collez ça dans l'invite de commande :
- Code:
powershell "(Get-WmiObject -query ‘select * from SoftwareLicensingService’).OA3xOriginalProductKey"
Par un logiciel :
x64
x86
Microsoft nous propose de leur téléphoner et de leur envoyer la facture d'achat d'un ordinateur.
Il répondrons avec la clé de produit Microsoft
Page 1 sur 1
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum
|
|
Lun 2 Jan - 16:53 par Admin
» Windows : Retirer Cortana sous Windows 10.
Ven 2 Déc - 16:24 par Admin
» Windows : Comment installer de nouvelles polices ?
Sam 9 Avr - 17:46 par Admin
» Windows : HDD interne non détecté ?
Mer 16 Mar - 23:25 par Admin
» Windows : Fin de la version d'essai !!!
Ven 22 Jan - 17:05 par Admin
» MacOS : Antivirus et pare-feu !
Mer 20 Jan - 22:10 par Admin
» Ecran noir Clash Of Clans
Mer 20 Jan - 22:02 par Admin
» Vente : Dalle 13" d'occasion.
Dim 17 Jan - 11:44 par Admin
» Vente : Dalles 15" d'occasion.
Dim 17 Jan - 11:40 par Admin