» » Как узнать ключ активации Windows

Как узнать ключ активации Windows

16 444 1
  • Не нравится
  • +61
  • Нравится
Как узнать ключ активации Windows

Как узнать ключ активации Windows

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

 Определение ключа с помощью VBScript
 Создайте в любом удобном месте текстовый файл, например на рабочем столе. Переименуйте его в WindowsKey

Как узнать ключ активации 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 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
 
 Нажмите сочетание клавиш Ctrl + S чтобы сохранить файл.

Как узнать ключ активации Windows

 Измените расширение файла на .vbs

Как узнать ключ активации Windows

 Дважды щёлкните по файлу WindowsKey.vbs, появится окно с вашим ключом активации

Как узнать ключ активации Windows

 Нажмите кнопку OK, появится ещё одно окно с более подробной информацией.

Как узнать ключ активации Windows

 Также вы можете скачать zip-архив с файлом WindowsKey.vbs
 
 
 
 
Скачать архив с файлом WindowsKey.vbs
 

Вес:
758 b
Загрузок:
1506
 

 
 
  
 
 Команды для проверки активации
slmgr /dli - отображение сведений о лицензии.
slmgr /dlv - отображение подробных сведений о лицензии.
slmgr /xpr - отображение даты окончания активации.
 Эти команды выполняются в командной строке запущенной от имени администратора.

 Для отображения сведений о лицензии выполните команду slmgr /dli

Как узнать ключ активации Windows

 Откроется окно сведений о лицензии.

Как узнать ключ активации Windows

 Для отображения подробных сведений о лицензии выполните команду slmgr /dlv

Как узнать ключ активации Windows

 Откроется окно подробных сведений о лицензии

Как узнать ключ активации Windows

 Для отображения даты окончания активации выполните команду slmgr /xpr

Как узнать ключ активации Windows

 Откроется окно отображения даты окончания активации

Как узнать ключ активации Windows

 И ещё несколько полезных команд:
slmgr.vbs /rearm - сброс активации, возврат в триальное состояние.
slmgr.vbs /ipk - установка ключа продукта.
slmgr.vbs /skms - установка имени или порта KMS.
slmgr.vbs /ato - активация Windows.
slmgr.vbs /upk - удаление ключа продукта.
slmgr.vbs /cpky - удаление ключа продукта из реестра (предотвращение хищения).



winnote Администраторы

Автор: winnote

Комментарии пользователей (1)

  1. Фото юзера Роман
    Роман 13.03.2016 комментариев публикаций
    Вроде получило! Главное, что бы ключ правильным оказался)

Информация

Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.