Дізнатися ключ продукту Windows за допомогою VBS-скрипта

Ключ продукту Windows (або ліцензійний ключ) є важливою інформацією для користувачів, оскільки він потрібен для активації операційної системи. Якщо ви загубили ключ і хочете дізнатися, яким саме активована ваша Windows, це можна зробити швидко та просто за допомогою VBS-скрипта. У цій статті ми детально розглянемо, як створити та запустити VBS-скрипт, щоб отримати ключ продукту.

Що таке VBS-скрипт?

VBS (Visual Basic Script) — це простий скриптовий файл, який можна використовувати для виконання різних завдань у Windows. Його можна створити за допомогою звичайного текстового редактора, наприклад, Блокнота (Notepad).

Покрокова інструкція

Крок 1. Відкрийте текстовий редактор

1. Натисніть Win + R, щоб відкрити діалогове вікно “Виконати”.
2. Введіть notepad і натисніть Enter.

Крок 2. Вставте код VBS-скрипта

Скопіюйте наступний код і вставте його в Блокнот:
Set WshShell = CreateObject("WScript.Shell")
regKey = "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\"
DigitalProductId = WshShell.RegRead(regKey & "DigitalProductId")
Win8ProductName = "Windows Product Name: " & WshShell.RegRead(regKey & "ProductName") & vbNewLine
Win8ProductID = "Windows Product ID: " & WshShell.RegRead(regKey & "ProductID") & vbNewLine
Win8ProductKey = ConvertToKey(DigitalProductId)
strProductKey ="Windows 8 Key: " & Win8ProductKey
Win8ProductID = Win8ProductName & Win8ProductID & strProductKey
MsgBox(Win8ProductKey)
MsgBox(Win8ProductID)
Function ConvertToKey(regKey)
Const KeyOffset = 52
isWin8 = (regKey(66) \ 6) And 1
regKey(66) = (regKey(66) And &HF7) Or ((isWin8 And 2) * 4)
j = 24
Chars = "BCDFGHJKMPQRTVWXY2346789"
Do
Cur = 0
y = 14
Do
Cur = Cur * 256
Cur = regKey(y + KeyOffset) + Cur
regKey(y + KeyOffset) = (Cur \ 24)
Cur = Cur Mod 24
y = y -1
Loop While y >= 0
j = j -1
winKeyOutput = Mid(Chars, Cur + 1, 1) & winKeyOutput
Last = Cur
Loop While j >= 0
If (isWin8 = 1) Then
keypart1 = Mid(winKeyOutput, 2, Last)
insert = "N"
winKeyOutput = Replace(winKeyOutput, keypart1, keypart1 & insert, 2, 1, 0)
If Last = 0 Then winKeyOutput = insert & winKeyOutput
End If
a = Mid(winKeyOutput, 1, 5)
b = Mid(winKeyOutput, 6, 5)
c = Mid(winKeyOutput, 11, 5)
d = Mid(winKeyOutput, 16, 5)
e = Mid(winKeyOutput, 21, 5)
ConvertToKey = a & "-" & b & "-" & c & "-" & d & "-" & e
End Function

Крок 3. Збережіть файл

1. Натисніть Файл → Зберегти як…
2. У полі “Тип файлу” виберіть Усі файли.
3. Введіть ім’я файлу, наприклад, ProductKey.vbs.
4. Обов’язково додайте розширення .vbs і виберіть місце для збереження, наприклад, на робочому столі.

Також можете скористатися готовим скриптом.

Крок 4. Запустіть скрипт

1. Перейдіть до місця, де ви зберегли файл ProductKey.vbs.
2. Двічі клацніть на файлі, щоб запустити його.
3. Відкриється вікно, в якому буде відображено ваш ключ продукту.

Важливі примітки

• Якщо ваш комп’ютер має Windows, активовану за допомогою цифрової ліцензії, цей метод може не працювати, оскільки ключ продукту зберігається в обліковому записі Microsoft, а не локально.
• Будьте обережні при роботі з VBS-файлами, завантаженими з невідомих джерел, оскільки вони можуть містити шкідливий код.

Як працює цей спосіб показано в наступному відео:

Отримати ключ продукту Windows за допомогою VBS-скрипта — це простий і швидкий процес. Дотримуючись нашої покрокової інструкції, ви зможете створити та запустити скрипт без будь-яких спеціальних навичок. Пам’ятайте, що ключ продукту — це важлива інформація, і його варто зберігати в надійному місці.