Как узнать лицензионный ключ своей windows

 Знать лицензионный ключ своей windows необходимо, на случай если вдруг вы потеряете наклейку с данным ключом, либо произойдет серьезный сбой в системе, при котором будет существовать только один способ от него избавиться, а именно переустановить windows. А как уже известно, при установке операционной системы, нужно вводить ключ продукта, который вы к вашему сожалению потеряли, а цена как мы знаем у него достаточно большая.

Так что, пока не возникла проблема с системой, покажу пару способов узнать лицензионный ключ своей windows.

В первом способе воспользуемся специальным скрипт кодом, который надо будет вставить в текстовой редактор. Для этого нужно его с начало создать. Жмем правой кнопкой мыши на рабочем столе, выбираем пункт создать -> текстовой документ.

Код скрипта для вставки в текстовой документ.

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 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

Копируем данный код, открываем созданный новый текстовой документ и вставляем его, путем нажатия клавиш ctrl+v.

 Теперь жмем вкладку файл -> сохранить как...

 В открывшемся окне, в строке имя файла нужно поменять расширение txt на vbs и нажать кнопку сохранить.

 Открываем созданный файл и видим ключ продукта  операционной системы windows. Обязательно сохраните его.

 После нажатия кнопки OK скрипт покажет версию и уникальный идентификатор (ID) нашей системы.

 Во втором способе воспользуемся сторонней утилитой для определения ключа продукта, таких программ в сети огромное множество, рассмотрим одну из них. Программа называется ProduKey, скачать её можно с официального сайта разработчика, перейдя по ссылке http://www.nirsoft.net/utils/product_cd_key_viewer.html. На сайте жмем на пункт Download links are on the bottom of this page.

 Далее нажимаем на ссылку скачивание утилиты, Dowload ProduKey (In Zip file).

 Открываем скаченный архив, сразу запускаем exe файл и видим свой ключ лицензии windows.

Оставляйте своё мнение о данной статье, ну и конечно же задавайте свои вопросы, если у вас что-то вдруг пошло не так.

Спасибо за внимание!