विंडोज 10, विंडोज 8 और विंडोज 7 में अपनी उत्पाद कुंजी कैसे देखें

यदि आप खो गए हैं या भूल गए हैं कि आपने अपनी Windows उत्पाद कुंजी कहाँ संग्रहीत की थी, तो मेरे पास आपके लिए एक समाधान है। आज हम देखेंगे कि कैसे एक साधारण वीबीएस स्क्रिप्ट का उपयोग हमें विंडोज 10, विंडोज 8 या विंडोज 7 की स्थापित कॉपी की उत्पाद कुंजी दिखाने के लिए किया जा सकता है। किसी तीसरे पक्ष के सॉफ़्टवेयर का उपयोग किए बिना अपने पीसी पर स्थापित ओएस से अपनी उत्पाद कुंजी निकालने का यह एक आसान समाधान है। ये रहा।

दरअसल, पहले मैंने एक पोस्ट किया था समान समाधान जो पावरशेल का इस्तेमाल करता था। लेकिन कई उपयोगकर्ताओं ने शिकायत की कि यह उनके लिए विफल रहता है। अहस्ताक्षरित cmdlets चलाने के लिए PowerShell को अतिरिक्त उपयोगकर्ता कौशल और अतिरिक्त बदलाव की आवश्यकता हो सकती है।

पावरशेल की तुलना में, यह वीबीस्क्रिप्ट समाधान लगभग सही है। आपको बस इतना करना है कि फ़ाइल पर क्लिक करना है। प्रति अपनी Windows 10 उत्पाद कुंजी देखें

1. नोटपैड खोलें।
2. निम्नलिखित टेक्स्ट को नोटपैड विंडो में कॉपी और पेस्ट करें

   विकल्प स्पष्ट। मंद objshell, पथ, DigitalID, परिणाम। objshell सेट करें = CreateObject ("WScript. शेल") 'रजिस्ट्री कुंजी पथ पथ सेट करें = "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\" 'रजिस्ट्री कुंजी मान DigitalID = objshell. RegRead (पथ और "DigitalProductId") Dim ProductName, ProductID, ProductKey, ProductData 'Get ProductName, ProductID, ProductKey ProductName = "Product Name:" और objshell. RegRead (पथ और "उत्पादनाम") ProductID = "उत्पाद आईडी:" और objshell. RegRead (पथ और "ProductID") ProductKey = "स्थापित कुंजी:" और ConvertToKey (DigitalID) ProductData = ProductName और vbNewLine और ProductID और vbNewLine और ProductKey 'फ़ाइल में सहेजे जाने पर मेसबॉक्स दिखाएं। अगर vbYes = MsgBox (ProductData & vblf & vblf & "Save to a file?", vbYesNo + vbQuestion, "BackUp Windows Key Information") तो ProductData को सेव करें। अगर अंत। 'बाइनरी को वर्णों में कनवर्ट करें फंक्शन ConvertToKey (कुंजी) Const KeyOffset = 52 Dim isWin8, Maps, i, j, Current, KeyOutput, Last, keypart1, Insert 'जाँचें कि OS Windows 8 isWin8 है या नहीं = (कुंजी) (66) \ 6) और 1 कुंजी (66) = (कुंजी (66) और &एचएफ7) या ((isWin8 और 2) * 4) i = 24 मानचित्र = "बीसीडीएफजीएचजेकेएमपीक्यूआरटीवीडब्ल्यूएक्सवाई2346789" वर्तमान करें= 0 जे = 14 वर्तमान करें = करंट * 256 करंट = की (j + KeyOffset) + करंट की (j + KeyOffset) = (करंट \ 24) करंट = करंट मॉड 24 j = j -1 लूप जबकि j> = 0 i = i -1 KeyOutput = मिड (मैप्स, करंट + 1, 1) और कीऑटपुट लास्ट = करंट लूप जबकि i>= 0. अगर (isWin8 = 1) तो कीपार्ट 1 = मिड (कीऑटपुट, 2, लास्ट) इंसर्ट = "एन" कीऑउटपुट = रिप्लेस (कीऑटपुट, कीपार्ट 1, कीपार्ट 1 और इंसर्ट, 2, 1, 0) अगर लास्ट = 0 तो कीऑउटपुट = सम्मिलित करें और KeyOutput समाप्त करें यदि। ConvertToKey = मिड (कीऑटपुट, 1, 5) और "-" और मिड (कीऑटपुट, 6, 5) और "-" और मिड (कीऑटपुट, 11, 5) और "-" और मिड (कीऑटपुट, 16, 5) और "-" और मिडो (कीऑटपुट, 21, 5) एंड फंक्शन 'डेटा को फाइल में सेव करें फंक्शन सेव (डेटा) डिम fso, fName, txt, objshell, यूजरनेम सेट objshell = CreateObject ("wscript.shell") 'वर्तमान प्राप्त करें उपयोगकर्ता नाम। उपयोगकर्ता नाम = objshell. ExpandEnvironmentStrings("%UserName%") 'डेस्कटॉप पर एक टेक्स्ट फाइल बनाएं। fName = "C:\Users\" और UserName & "\Desktop\WindowsKeyInfo.txt" सेट fso = CreateObject ("Scripting. FileSystemObject") txt = fso. क्रिएटटेक्स्टफाइल (fName) txt. राइटलाइन डेटा txt। क्लोज एंड फंक्शन 
   

3. ऊपर दिए गए टेक्स्ट को डेस्कटॉप पर ".vbs" एक्सटेंशन वाली फाइल में सेव करें।
   बोनस टिप: यह सुनिश्चित करने के लिए कि आप ".vbs" एक्सटेंशन के साथ फ़ाइल को सही तरीके से सहेज रहे हैं, आप इसका नाम दोहरे उद्धरण चिह्नों में संलग्न कर सकते हैं, उदाहरण के लिए, "BackupWindowsKey.vbs"।
   
4. अब अपनी BackupWindowsKey.vbs फाइल को ओपन करें
5. वोइला, आप उत्पाद कुंजी स्क्रीन पर प्रदर्शित होती है!
   

बैकअपWindowsKey.vbs फ़ाइल डाउनलोड करने के लिए यहां क्लिक करें

मैंने विंडोज 7, विंडोज 8 और विंडोज 10 पर इस ट्रिक का परीक्षण किया। यह सभी उल्लिखित ऑपरेटिंग सिस्टम में त्रुटिपूर्ण रूप से काम करता है। श्रेय: बकवास @ एमडीएल.