رئيسي البرامج النصية والقرص كيفية عرض مفتاح المنتج الخاص بك في Windows 10 و Windows 8 و Windows 7

كيفية عرض مفتاح المنتج الخاص بك في Windows 10 و Windows 8 و Windows 7



إذا فقدت أو نسيت المكان الذي قمت بتخزين مفتاح منتج Windows فيه ، فلدي حل لك. سنرى اليوم كيف يمكن استخدام برنامج نصي بسيط من VBS لإظهار مفتاح المنتج لنسخة مثبتة من Windows 10 أو Windows 8 أو Windows 7. إنه حل بسيط لاستخراج مفتاح المنتج من نظام التشغيل المثبت على جهاز الكمبيوتر الخاص بك بدون باستخدام أي برنامج طرف ثالث. ها نحن ذا.

إعلانات


في الواقع ، لقد نشرت سابقًا ملف حل مماثل التي تستخدم بوويرشيل. لكن العديد من المستخدمين اشتكوا من فشلها بالنسبة لهم. قد يتطلب PowerShell مهارات مستخدم إضافية وتعديلات إضافية لتشغيل أوامر cmdlets غير الموقعة.

كيف تضيف أرقام الصفحات في مستندات جوجل

بالمقارنة مع PowerShell ، فإن حل VBScript هذا مثالي تقريبًا. كل ما عليك فعله هو النقر فوق الملف. إلى عرض مفتاح منتج Windows 10 الخاص بك



  1. افتح المفكرة.
  2. انسخ والصق النص التالي في نافذة المفكرة
    الخيار صريح خافت objshell ، مسار ، DigitalID ، نتيجة تعيين objshell = CreateObject ('WScript.Shell') 'تعيين مسار مفتاح التسجيل =' HKLM  SOFTWARE  Microsoft  Windows NT  CurrentVersion  'قيمة مفتاح التسجيل DigitalID = objshell.RegRead (المسار & 'DigitalProductId') Dim ProductName، ProductID، ProductKey، ProductData 'Get ProductName، ProductID، ProductKey ProductName =' Product Name: '& objshell.RegRead (Path &' ProductName ') ProductID =' Product ID: '& objshell. RegRead (المسار & 'ProductID') ProductKey = 'المفتاح المثبت:' & ConvertToKey (DigitalID) ProductData = ProductName & vbNewLine & ProductID & vbNewLine & ProductKey 'إظهار صندوق الرسائل في حالة الحفظ في ملف إذا كان vbYes = MsgBox (ProductData & vblf & vblf & & 'حفظ إلى ملف؟' ، vbYesNo + vbQuestion ، 'BackUp Windows Key Information') ثم حفظ ProductData End If 'تحويل ثنائي إلى حرف دالة ConvertToKey (Key) Const KeyOffset = 52 Dim isWin8، Maps، i، j، Current، KeyOutput ، Last، keypart1، insert 'تحقق مما إذا كان نظام التشغيل هو Windows 8 isWin8 = (Key (66)  6) And 1 Key (66) = (Key (66) And & HF7) أو ((isWin8 و 2) * 4) i = 24 Maps = 'BCDFGHJKMPQRTVWXY2346789' Do Current = 0 j = 14 Do Current = Current * 256 Current = Key (j + KeyOffset) + Current المفتاح (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 = الحلقة الحالية بينما i> = 0 If (isWin8 = 1) ثم keypart1 = Mid (KeyOutput، 2، Last) أدخل = 'N' KeyOutput = استبدال (KeyOutput، keypart1، keypart1 & insert، 2، 1، 0) إذا كان الأخير = 0 ثم KeyOutput = insert & KeyOutput End If ConvertToKey = Mid (KeyOutput، 1، 5) & '-' & Mid (KeyOutput، 6، 5) & '-' & Mid (KeyOutput، 11، 5) & '-' & Mid ( KeyOutput، 16، 5) & '-' & Mid (KeyOutput، 21، 5) End Function 'حفظ البيانات في ملف الوظيفة حفظ (البيانات) Dim fso، fName، txt، objshell، UserName Set objshell = CreateObject (' wscript. shell ')' الحصول على اسم المستخدم الحالي UserName = objshell.ExpandEnvironmentStrings ('٪ UserName٪') 'إنشاء ملف نصي على سطح المكتب fName =' C:  Users  '& UserName &'  Desktop  WindowsKeyI nfo.txt 'Set fso = CreateObject (' Scripting.FileSystemObject ') اضبط txt = fso.CreateTextFile (fName) txt.Writeline Data txt.Close End Function
  3. احفظ النص أعلاه في ملف بامتداد '.vbs' على سطح المكتب.
    نصيحة إضافية: للتأكد من حفظ الملف بشكل صحيح بامتداد '.vbs' ، يمكنك كتابة اسمه محاطًا بعلامات اقتباس مزدوجة ، على سبيل المثال ، 'BackupWindowsKey.vbs'.
    النسخ الاحتياطي لمفتاح منتج Windows Windows 10
  4. افتح الآن ملف BackupWindowsKey.vbs
  5. فويلا ، يتم عرض مفتاح المنتج على الشاشة!
    عرض مفتاح منتج Windows 10

انقر هنا لتنزيل ملف BackupWindowsKey.vbs

لقد اختبرت هذه الخدعة على Windows 7 و Windows 8 و Windows 10. وهي تعمل بشكل لا تشوبه شائبة في جميع أنظمة التشغيل المذكورة. الاعتمادات: هراء @ MDL .

مقالات مثيرة للاهتمام

اختيار المحرر

أفضل اختبارات سرعة النطاق العريض
أفضل اختبارات سرعة النطاق العريض
يمكن أن تكون مواقع اختبار السرعة مهمة للغاية في التحقق من سرعة شبكة Wi-Fi الخاصة بك ، حيث لا تتلقى الأسر في المملكة المتحدة عادةً سرعة النطاق العريض التي تدفع مقابلها. هناك العشرات من المواقع التي
تعود ميزة A2DP Sink إلى نظام التشغيل Windows 10
تعود ميزة A2DP Sink إلى نظام التشغيل Windows 10
تقوم Microsoft بإعادة إضافة A2DP Sink لـ Bluetooth في نظام التشغيل Windows 10. تمت إزالته في Windows 8 ، مما يجعل Windows 7 آخر إصدار لنظام التشغيل مع دعم A2DP Sink. الآن ، الأمور تتغير ، الإعلان في الإصدارات السابقة للإصدار من نظام التشغيل Windows 7 ، تم دعم أدوار مصدر A2DP وصرفه في الأصل ، ولكن تم إسقاط هذا في الإصدار النهائي لإصدار RTM.
Sloths PREMIUM 4K Theme لنظام التشغيل Windows 10
Sloths PREMIUM 4K Theme لنظام التشغيل Windows 10
قامت Microsoft بتحديث مجموعتها من السمات المميزة بدقة 4K ، والتي تحتوي بالفعل على الكثير من حزم السمات الرائعة. تحديث اليوم هو Sloths PREMIUM ، وهي مجموعة من 15 صورة عالية الدقة. إعلانات يقضي حيوان الكسلان المميز معظم وقته معلقًا بالمقلوب. ألقِ نظرة على هذه الوجوه الخمسة عشر المخادعة بدقة 4k المميزة ، مجانًا لنظام التشغيل Windows
تمكين شريط البحث العائم في نظام التشغيل Windows 10 (تطبيق Cortana الشامل)
تمكين شريط البحث العائم في نظام التشغيل Windows 10 (تطبيق Cortana الشامل)
يمكنك تمكين مربع البحث العائم في Windows 10 'Redstone 4'. هذه ميزة جديدة تحل محل مربع البحث في شريط المهام.
كيفية إعداد جهاز Asus Router
كيفية إعداد جهاز Asus Router
إذا كنت قد اشتريت للتو جهاز توجيه Asus ، فربما تتساءل عن كيفية إعداده. على الرغم من أن إعداد أجهزة التوجيه يعتبر عادة صعبًا ، إلا أنه لا يجب أن يكون كذلك. هذا هو المكان الذي يأتي فيه هذا المقال
كيفية مسح الحافظة
كيفية مسح الحافظة
مع التركيز الشديد على الخصوصية والأمان ، فإن حماية نفسك في عالم اليوم الرقمي أمر بالغ الأهمية. على الرغم من وجود العديد من الطرق لتحقيق ذلك ، فقد تمر بعض تهديدات الخصوصية البسيطة دون أن يلاحظها أحد. أحد الأمثلة على ذلك هو الحافظة
تفعيل المظهر الداكن التجريبي على YouTube
تفعيل المظهر الداكن التجريبي على YouTube
يمكنك تمكين ميزة Dark Theme التجريبية على YouTube باستخدام أي متصفح حديث يدعم تحرير ملفات تعريف الارتباط. هنا هو كيف.