Principal Scripts Et Ajustements Comment afficher votre clé de produit dans Windows 10, Windows 8 et Windows 7

Comment afficher votre clé de produit dans Windows 10, Windows 8 et Windows 7

Si vous avez perdu ou oublié où vous aviez stocké votre clé de produit Windows, j'ai une solution pour vous. Aujourd'hui, nous allons voir comment un simple script VBS peut être utilisé pour nous montrer la clé de produit d'une copie installée de Windows 10, Windows 8 ou Windows 7. C'est une solution simple pour extraire votre clé de produit du système d'exploitation installé sur votre PC sans en utilisant un logiciel tiers. Et c'est parti.

Publicité


En fait, plus tôt, j'ai publié un solution similaire qui utilisait PowerShell. mais de nombreux utilisateurs se sont plaints que cela échoue pour eux. PowerShell peut nécessiter des compétences utilisateur supplémentaires et des ajustements supplémentaires pour exécuter des applets de commande non signées.

Par rapport à PowerShell, cette solution VBScript est presque parfaite. Tout ce que vous avez à faire est de cliquer simplement sur le fichier. À afficher votre clé de produit Windows 10



  1. Ouvrez le Bloc-notes.
  2. Copiez et collez le texte suivant dans la fenêtre Bloc-notes
    Option Explicit Dim objshell, path, DigitalID, Result Set objshell = CreateObject ('WScript.Shell') 'Définir le chemin de la clé de registre Path =' HKLM  SOFTWARE  Microsoft  Windows NT  CurrentVersion  '' Valeur de la clé de registre DigitalID = objshell.RegRead (Chemin & 'DigitalProductId') Dim ProductName, ProductID, ProductKey, ProductData 'Get ProductName, ProductID, ProductKey ProductName =' Product Name: '& objshell.RegRead (Chemin &' ProductName ') ProductID =' Product ID: '& objshell. RegRead (Path & 'ProductID') ProductKey = 'Installed Key:' & ConvertToKey (DigitalID) ProductData = ProductName & vbNewLine & ProductID & vbNewLine & ProductKey 'Afficher la boîte de messagerie si vous enregistrez dans un fichier Si vbYes = MsgBox (ProductData & vblf & vblf & 'Save to a file?', VbYesNo + vbQuestion, 'BackUp Windows Key Information') puis Save ProductData End If 'Convertir le binaire en caractères Fonction ConvertToKey (Key) Const KeyOffset = 52 Dim isWin8, Maps, i, j, Current, KeyOutput , Enfin, keypart1, insérez `` Vérifier si le système d'exploitation est Windows 8 isWin8 = (clé (66)  6) et 1 clé (66) = (Key (66) And & HF7) Or ((isWin8 And 2) * 4) i = 24 Maps = 'BCDFGHJKMPQRTVWXY2346789' Do Current = 0 j = 14 Do Current = Current * 256 Current = Key (j + KeyOffset) + Current Key (j + KeyOffset) = (Current  24) Current = Current Mod 24 j = j -1 Loop While j> = 0 i = i -1 KeyOutput = Mid (Maps, Current + 1, 1) & KeyOutput Last = Current Loop While i> = 0 If (isWin8 = 1) Then keypart1 = Mid (KeyOutput, 2, Last) insert = 'N' KeyOutput = Replace (KeyOutput, keypart1, keypart1 & insert, 2, 1, 0) If Last = 0 Then KeyOutput = insert & KeyOutput End Si ConvertToKey = Mid (KeyOutput, 1, 5) & '-' & Mid (KeyOutput, 6, 5) & '-' & Mid (KeyOutput, 11, 5) & '-' & Mid ( KeyOutput, 16, 5) & '-' & Mid (KeyOutput, 21, 5) End Function 'Enregistrer les données dans un fichier Fonction Enregistrer (données) Dim fso, fName, txt, objshell, UserName Set objshell = CreateObject (' wscript. shell ')' Obtenir le nom d'utilisateur actuel UserName = objshell.ExpandEnvironmentStrings ('% UserName%') 'Créer un fichier texte sur le bureau fName =' C:  Users  '& UserName &'  Desktop  WindowsKeyI nfo.txt 'Set fso = CreateObject (' Scripting.FileSystemObject ') Set txt = fso.CreateTextFile (fName) txt.Writeline Data txt.Close End Function
  3. Enregistrez le texte ci-dessus dans un fichier avec l'extension «.vbs» sur le bureau.
    Conseil bonus: pour vous assurer que vous enregistrez correctement le fichier avec l'extension «.vbs», vous pouvez taper son nom entre guillemets, par exemple, «BackupWindowsKey.vbs».
    sauvegarde de la clé de produit windows Windows 10
  4. Ouvrez maintenant votre fichier BackupWindowsKey.vbs
  5. Voila, votre clé de produit s'affiche à l'écran!
    afficher la clé de produit Windows 10

Cliquez ici pour télécharger le fichier BackupWindowsKey.vbs

J'ai testé cette astuce sur Windows 7, Windows 8 et Windows 10. Cela fonctionne parfaitement dans tous les systèmes d'exploitation mentionnés. Crédits: nononsence @ MDL .

Des Articles Intéressants

Choix De L'Éditeur

Tag Archives: navigateur spartiate windows 10
Tag Archives: navigateur spartiate windows 10
Changer l'icône du panneau de configuration dans Windows 10
Changer l'icône du panneau de configuration dans Windows 10
Cet article explique comment changer l'icône du Panneau de configuration dans Windows 10 en une icône personnalisée (* .ico) pour tous les utilisateurs ou votre compte d'utilisateur uniquement.
Archives par étiquette: mrt.exe
Archives par étiquette: mrt.exe
Masquer ou afficher la barre des favoris dans Microsoft Edge Chromium
Masquer ou afficher la barre des favoris dans Microsoft Edge Chromium
Edge Chromium Build 124 permet d'afficher ou de masquer la barre de favoris sur les onglets, avec une option individuelle pour la nouvelle page à onglets.
Comment créer un raccourci pour ouvrir les applications d'écran de verrouillage dans Windows 8.1
Comment créer un raccourci pour ouvrir les applications d'écran de verrouillage dans Windows 8.1
Lock Screen, qui a été introduit dans Windows 8, existe également dans Windows 8.1. Certaines de ses options peuvent être personnalisées via l'application Paramètres du PC, et certaines d'entre elles sont profondément cachées (heureusement, nous avons Lock Screen Customizer pour les contrôler). L'une des fonctionnalités de l'écran de verrouillage est les applications d'écran de verrouillage. Cela vous permet de placer
Des fonds d'écran sur le thème Xbox X sont disponibles au téléchargement auprès de Microsoft
Des fonds d'écran sur le thème Xbox X sont disponibles au téléchargement auprès de Microsoft
Après l'annonce de la dernière génération de consoles Xbox, Xbox Series X, Microsoft publie un ensemble de fonds d'écran sur le thème de la Xbox X, comprenant des jeux comme Gears 5, Star Wars et un ensemble d'images avec le logo Series X. Si vous êtes un fan des consoles Xbox, vous voudrez peut-être télécharger les images et
Contourner les limitations de Windows 10 et définir le moteur de recherche souhaité dans Cortana
Contourner les limitations de Windows 10 et définir le moteur de recherche souhaité dans Cortana
Aujourd'hui, Microsoft a introduit une nouvelle limitation dans Windows 10 selon laquelle Cortana ne peut être intégré qu'à Bing et Microsoft Edge. Pour ce faire, ils ont apporté des modifications côté serveur qui ont verrouillé la possibilité de changer le moteur de recherche de Cortana en Google ou d'utiliser d'autres navigateurs Web. Voici un moyen de débloquer cette capacité.