Вопрос: Как найти ключ продукта для Windows 8?

 

Как установить Windows 8.1 без ввода ключа

Видео взято с канала: PinVideo


 

Как узнать ключ Windows 8

Видео взято с канала: OWindows8


 

Как узнать лицензионный ключ установленной Windows 8, 8.1, 10

Видео взято с канала: Notebook Master


 

Как узнать ключ продукта Windows 7,8,8 1,10? Легко и Просто!

Видео взято с канала: You Must Know How


 

Как узнать ключ Windows установленной на компьютере и ноутбуке

Видео взято с канала: Компьютерные курсы Евгения Юртаева


 

windows 8.1 без ключа | убрать ввод ключа при установке

Видео взято с канала: Юрий Изучаем компьютер


 

ГДЕ ВЗЯТЬ КЛЮЧ ПРОДУКТА ДЛЯ Windows 8.1 БЕСПЛАТНО!!!

Видео взято с канала: Я НЕ МАСТЕР


29 комментариев

  • Если винда требует ключ активации, то подобрана не та сборка. В вин8 и 10 при вшитом ключе активация происходит автоматически. Причем с ключем от вин8 активируется и вин10. Обычно в ноутах предустановлены SL сборки, их и надо ставить (язык не важен).

  • 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

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

  • Спасибо Вам большое….Сначала думал дальше не слушать но пришлось мыслено подгонят вас…ну давай быстрей же говори…..Но UltraISO пришлось скачать на 4пда..и пошло отлично…думал что на незарегистрированом Ultra этот номер не пройдет…Спасибо ОГРОМНОЕ..Побольше бы таких как Вы…

  • Здравствуйте,у меня всё получилось(почти),у меня в конце,когда я нажал кнопку «Активировать»,написало-«Не удаётся активировать Windows на этом устройстве,так как наши серверы активации на данный момент недоступны.Убедитесь в наличии подключения в Интернету,и мы автоматически попробуем активировать Windows,когда служба станет доступна»,но блин,у меня комп подключен к инету,и что мне делать?Подскажите пожалуйста����

  • Внимательно смотрите видео до конца.Под видео нажмите на слово «ЕЩЕ» откроются все ссылки.Обычная программа UltraISO не подойдет.Все ссылки под видео.В конце видео я показал,что вначале установки уже ввод ключа уже нет.Кто-то смотрит не внимательно из-за этого злятся.

  • Прописала сначала VBS скрипт. Проблем не нашлось. Потом скачала эту программу KMS Auto. Отключила брендмауэр во всех трех сетях, которые были активны и антивирус отключила. Запустила первый файл из архива. Дальше по кнопкам, там всё понятно. И оп-ля!
    P.S.Выдавало ошибку активации 0xC004F061 до всех этих танцев с бубном.

  • Друже! Если куришь,бросай это дело.если употребляешь алкоголь тоже завяжи навсегда! И также если употребляешь в пищу: сардельки,майонезы,чипсы,канфеты,сладкие газировки,копчености(жидкого копчения) и т.д. короче химозу то также завязывай! перейди на овсянку,варенные яйца творог,зелень,овощи.фрукты,зеленые,трявяные чаи,имбирь,лимон,мята,ромашка и другие корешки и травы… Начни принимать цынк,кальций.селен,магний,янтарная кислота,витамины всевозможные(комплексы витаминов, комплексы минералов… ну и все в таком духе ты понял меня. также пробежки,легкий спорт(турнички.бег,приседания.разгибания,отжимания,)и больше воды(лучше кипяченой или очищенной. Ну и обходи любым способом стрессовые ситуации(скандалы,споры.политика,слезы,новости,ругань). Это поможет омолодить и укрепить кожу,глаза,мышцы.кости,слух.органы ит.д. всего тела, короче организм вцелом. Успехов!!!!!!

  • Спс. Помогло. Только захотел переустановить винду на 64 бит. И тут я за сомневался, потом увидел тебя и понял какой у меня ключ. Крч ты спаситель меня, ведь я мог не узнав об этом переустановить винду и просрать лицензию.

  • Я сейчас скачиваю виндовс 8.1 и там написано про тот файл -«Файл загружен: 12/06/2014 02:14:07 GMT
    Размер файла: 3041.43 MB (3189172224 байт)
    Скачено: 16434
    SHA1: fb10a76d2c2f8db76add14f83c41b10b3994ffb2
    Ссылка действительна до: 03/29/2020 14:58:00 MSK» подойдут ли ключи с сылки которой есть в описании?

  • Я сделал 1 способ,получил ключ,ввёл его,нажал на «Активировать»,и мне пишет » что то прервало процесс устранения неполадок.убедитесь,что вы подлючены к интернету,подождите несколько минут и повторите попытку.(0х8007000d)».

  • Получилось получить ключ продукта двумя способами. Но при желании ввести его для активации Виндовс 7 показывает, что этот ключ введен автоматически и просит другой ключ продукта. Что делать? Система показывает, что осталось 18 дней

  • Спасибо, 1-й раз не получилось напишу как получилось windows 10:
    Установил я виндовс обновил его и в правом углу вышло запись нужен ключ и начал искать что можно сделать
    Посмотрел ваше видео с 1го раза не получилось, а потом понял что:
    при сохранение файла key указать внизу кодировку ANSI,
    при указание пути имя key а не key.ps1
    узнал ключ переписал его на бумагу
    переустановил виновс
    при установке написал ключ
    Все работает, спасибо

  • на первом же уроке я всегда вдалбливал что на рабочем столе можно хранить Только ярлыки, а для всего остального диск Д:\ ))
    хотяяя….. чем больше полуграмотных юЗверей, тем чаще приносят деньги за решение простейших проблем)

  • Спасибо огромное Евгений видеофайл с обзор точка Я сегодня захотел воспользоваться данной программой но мой защитный механизмом а также 11 защитных механизмов на известном сайте для проверки файлов обнаружила в файле угрозу.

  • Какой я ДАУН…
    У меня винда при покупке компа была сразу установлена и активирована и я не помню была ли наклейка на корпусе, но сейчас её нет. Я хотел переустановить винду чтобы убрать все, лишнее скачал в интернете Windows 10 pro, а установилась такая же какая была, домашняя и старую отформатировал теперь не понимаю пиратская у меня или нет����

  • Евгений! У меня почему-то не совпал ключ, определённый с помощью скрипта VBS c установленной на ноуте винде 7 и указанной в бирке ноута. Определённый с помощью ProduKey. на двух флешках со скаченными на них винда 10, но из разных источников скачивания, показал ключ одинаковый!? Ну это никак не может быть, потому что не могло быть так, что обе винды скаченные из разных источников имели один ключ. Как так получилось не пойму.

  • Вот я купила ПК, там была предустановлена лицензия, и предположим я захотела переустановить винду, (в коробке не было ключа активации, и должен ли он там быть?) это какое-то наеб*** ведь в стоимость компьютера была включена лицензия
    Но спасибо вам за этот скрипт

  • Молодой шеловек. Проблемка у меня такая значит.
    Нужно активировать виндовс 8
    Знаем мы наш код
    Но в коде есть нули, а при вводе нуля пишет следующие «при вводе кода, не должно быть таких символов»
    Как быть?

  • Автору видео респект и ЖИРНЫЙ ЛАЙК так как у меня все получилось! Теперь у меня 2 ключа (один на коробке и один этот) Но они отлдичаются друг от друга Прикольно! Молодца! Так держать! Я правда пробовал на «семерке» и получилось

  • Здравствуйте, У меня получилься взять ключ винду, но когда я пробовал заново активировать по этому ключу, система говорит что нужно вводит другой ключ продукта! Как быть? У меня Windows 7 Ultimate N, думаю пиратка! (((

  • Лол… У меня винда была установлена при покупке. Коробку сохранил но на ней ничего нет, как и на ноуте. Провёл я эту манипуляцию и мне говорят что ключ не подходит… Капец… Надеюсь это видео кому-то помогло, но к сожалению мне нет… Автору спасибо за труды

  • Правильный текст.

    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

  • Разумеется ты лучший, ��!!! Огромное спасибо, но при копировании текста с указанного сайта обноружены проблемы то в тексте ошибка то при копировании создаются буквы лишние так что после копирования проверьте правильность слов команд относительно видео.

  • Если данный метод подходит исключительно для Windows 8 то у меня не получилось так как я таким образом пытался активировать Windows 10 Я так понял что для Windows 10 данный метод не подходит Обидно блин(((

  • Автору респект, все прокатило. Для тех кто в танке даю текст:

    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

  • Сценарий: C:\Users\user\Desktop\get_windows_8_key.vbs
    Строка: 46
    Символ: 13
    Ошибка: Недопустимый знак
    Код: 800А0408
    Источник: Ошибка компиляции Microsoft VBScript
    Мне пишет что нужно сохранит в формате Юникода
    Что делать подскажи пожалуйста

  • для тех кто в танке: есть универсальные ключи тупо для установки они неактивируют но дают возможность установить винду. ета ссылка не оф версия, лучше прямиком с сайта майка щас они разрешают скачивать оф образы винды