ونڈوز 10 ، ونڈوز 8 اور ونڈوز 7 میں اپنی مصنوع کی کلید کو کیسے دیکھیں

اگر آپ کھو گئے یا بھول گئے کہ آپ نے اپنی ونڈوز پروڈکٹ کی کو کہاں محفوظ کیا ہے تو ، میرے پاس آپ کے پاس حل ہے۔ آج ہم دیکھیں گے کہ ونڈوز 10 ، ونڈوز 8 یا ونڈوز 7 کی انسٹال شدہ کاپی کی پروڈکٹ کی کو دکھانے کے لئے کس طرح ایک سادہ وی بی ایس اسکرپٹ کا استعمال کیا جاسکتا ہے۔ بغیر آپ کے کمپیوٹر پر نصب OS سے آپ کی مصنوع کی چابی نکالنا آسان حل ہے۔ کسی بھی تیسری پارٹی کے سافٹ ویئر کا استعمال کرتے ہوئے۔ ہم یہاں جاتے ہیں۔

اشتہار

اصل میں ، اس سے پہلے میں نے ایک پوسٹ کیا تھا اسی طرح کا حل جس میں پاور شیل استعمال کیا گیا تھا۔ لیکن بہت سے صارفین نے شکایت کی کہ یہ ان کے لئے ناکام ہے۔ پاورشیل کو بغیر دستخط شدہ سین ایم پیلیٹ چلانے کے ل user صارف کی اضافی مہارتیں اور اضافی موافقت کی ضرورت ہوگی۔

ونڈوز پر ڈی ایم جی فائل کو کیسے کھولنا ہے

پاور شیل کے مقابلے میں ، یہ VBScript حل تقریبا کامل ہے۔ آپ کو صرف فائل پر کلک کرنے کی ضرورت ہے۔ کرنا اپنے ونڈوز 10 پروڈکٹ کی کو دیکھیں

نوٹ پیڈ کھولیں۔

مندرجہ ذیل متن کو نوٹ پیڈ ونڈو میں کاپی اور پیسٹ کریں

آپشن واضح ڈم آبجیکٹ ، پاتھ ، ڈیجیٹل آئی ڈی ، رزلٹ سیٹ آبجیکٹ = تخلیق آبجیکٹ ('WScript.Shell') 'رجسٹری کلیدی راستہ طے کریں =' HKLM OF سافٹ ویئر  مائیکروسافٹ  ونڈوز NT  کرنٹ ویژن Reg '' رجسٹری کی کلیدی ویلیو ڈیجیٹل آئی ڈی = آبجیکٹ۔ریگ ریڈ (پاتھ اینڈ 'ڈیجیٹل پروڈکٹ آئی ڈی) ڈم پروڈکٹ نام ، پروڈکٹ آئی ڈی ، پروڈکٹکی ، پروڈکٹ ڈیٹا' پروڈکٹ نیم ، پروڈکٹ آئی ڈی ، پروڈکٹ کی پروڈکٹ کا نام حاصل کریں 'پروڈکٹ کا نام:' اور آبجیکٹ۔ ریگریڈ (پاتھ اور 'پروڈکٹ نیم') پروڈکٹ آئی ڈی = 'پروڈکٹ آئی ڈی:' اور آبجیکٹ۔ RegRead (Path & 'productID') ProductKey = 'انسٹال کردہ کلید:' & ConversToKey (DigitalID) ProductData = ProductName & vbNewLine & ProductID & vbNewLine & ProductKey 'اگر کسی فائل میں محفوظ ہوجائے تو میس باکس دکھائیں اگر vbYes = MsgBox (ProductData & vblf & vblf & vblf & 'کسی فائل میں محفوظ کریں؟' ، vbYesNo + vbQuestion ، 'Backupp Windows key معلومات') پھر پروڈکٹ ڈیٹا اینڈ سیف محفوظ کریں اگر 'بائنری ٹو کرس میں تبدیل کریں فنکشن کنورٹٹوکی (کلیدی) Const keyOffset = 52 Dim isWin8، نقشہ جات، i، j، موجودہ، کیو آؤٹ پٹ ، آخری ، کیپارت 1 ، داخل کریں 'چیک کریں کہ آیا ونڈوز 8 ونڈوز 8 ہے (ون (8)) (1 (66) 66 6) اور 1 کی (66) = (کلید (66) اور & HF7) یا ((isWin8 And 2) * 4) i = 24 نقشے = 'BCDFGHJKMPQRTVWXY2346789' کرنٹ = 0 j = 14 کرنٹ کریں = موجودہ * 256 موجودہ = کی (جے + کی آفس) + موجودہ کلیدی (j + KeyOffset) = (موجودہ  24) موجودہ = موجودہ Mod 24 j = j -1 لوپ جبکہ j> = 0 i = i -1 کیو آؤٹ پٹ = وسط (نقشہ جات ، موجودہ + 1 ، 1) اور کی آؤٹ پٹ آخری = موجودہ لوپ جبکہ i> = 0 اگر (isWin8 = 1) پھر کیپارت 1 = وسط (کی آؤٹ پٹ ، 2 ، آخری) ڈالیں = 'N' کیو آؤٹ پٹ = تبدیل کریں (کی آؤٹ پٹ ، کیپرٹ 1 ، کیپارت 1 اور داخل کریں ، 2 ، 1 ، 0) اگر آخری = 0 پھر کیو آؤٹ پٹ = داخل اور کی آؤٹ پٹ ختم اگر کنورٹٹوکی = وسط (کی آؤٹ پٹ ، 1 ، 5) اور '-' اور وسط (کی آؤٹ پٹ ، 6 ، 5) اور '-' اور وسط (کی آؤٹ پٹ ، 11 ، 5) & '-' اور وسط کی آؤٹ پٹ ، 16 ، 5) اور '-' اور وسط (کی آؤٹ پٹ ، 21 ، 5) اختتام فنکشن 'کسی فائل میں ڈیٹا کو محفوظ کریں فنکشن سیونگ (ڈیٹا) ڈیم ایف ایس او ، ایف اینام ، ٹی ایس ٹی ایس ، آبجیکٹ ، صارف نام سیٹ آبجیکٹ = تخلیق آبجیکٹ (' wscript)۔ شیل ')' موجودہ صارف کا نام صارف نام = آبجیکٹ حاصل کریں۔ ایکسپینڈ انوائرمنٹ سٹرنگ ('٪ صارف نام٪') 'ڈیسک ٹاپ پر ایک ٹیکسٹ فائل بنائیں fName =' C:  صارفین  'اور صارف نام &' 'ڈیسک ٹاپ  ونڈوزکی nfo.txt 'سیٹ fso = createObject (' اسکرپٹنگ.فائل سسٹم آبجیکٹ ') txt = fso.CreateTextFile (fName) txt.Writline ڈیٹا txt سیٹ کریں۔ اختتامی فنکشن بند کریں

ڈیسک ٹاپ پر '.vbs' ایکسٹینشن والی فائل میں مذکورہ متن کو محفوظ کریں۔
بونس کا مشورہ: اس بات کو یقینی بنانے کے لئے کہ آپ '.vbs' توسیع کے ذریعہ فائل کو صحیح طریقے سے محفوظ کررہے ہیں ، آپ اس کا نام ڈبل قیمتوں میں بند کر سکتے ہیں ، مثال کے طور پر ، 'بیک اپ ونڈوزکی' ڈبلیوز۔
اب اپنی بیک اپ ونڈوزکیجی ڈبلیو فائل کو کھولیں
Voila ، آپ کی مصنوعات کی کلید اسکرین پر ظاہر ہے!