Узнать ключ Windows 11, 10, 8, 7 VBS-скрипт

Поделиться
HTML-код
  • Опубликовано: 18 окт 2021
  • Чтобы скопировать скрипт как видео, идем сюда
    delalsam.blogspot.com/2021/08...
    Скрипт просто копирует параметры с реестра и объединяет данные в один ключ. Работает на вин7,8,10,11 - проверено.
    Как узнать ключ Windows 11
    а так же Как узнать ключ Windows 10
    еще Как узнать ключ Windows 8.1
    опять Как узнать ключ Windows 7
    Нужно просто запустить вбс скрипт и получить нужную информацию - ключ появится у вас на экране.
  • НаукаНаука

Комментарии • 41

  • @Artur_07
    @Artur_07 Год назад +2

    Спасибо тебе большое за то, что помог, и за то, что показал что скрипт безвреден... на виндовс 11 сработало как показано на видео (выдал ключ на виндовс 10 Pro... как я понял, предыдущий владелец обновял мой ноутбук до 11-ой версии)

  • @ANDRYS-js3dg
    @ANDRYS-js3dg 4 месяца назад +2

    Спасибо!
    Работает на win 10 pro.
    Виндовс с официального сайта.

  • @urapritula6711
    @urapritula6711 Год назад +2

    Огромное спасибо!!!!!!

  • @K-Prizrak
    @K-Prizrak 10 месяцев назад +2

    Попробовал. Появилась надпись:
    Windows Script Host
    Строка: 85
    Символ: 5
    Ошибка: Предполагается наличие 'Function'
    Код: 800A03F7
    Источник: Ошибка компиляции Microsoft VBScript
    До этого пробовал по другой инструкции в вышло подобное сообщение, но вот так:
    Строка: 55
    Символ: 53
    Ошибка: Предполагается наличие 'Loop'
    Код: 800A03FB

    • @PRODvigateL
      @PRODvigateL  10 месяцев назад

      скорее всего когда копировали код, строка перенеслась в другую строку, отсюда и ошибка.
      попробуйте отсюда скопировать. сейчас запустил на вин 11 - все работает.
      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

  • @dust3316
    @dust3316 2 года назад +2

    Приветствую,заменил мат плату лицензия слетела,вожу ключь который был(стоял) не действителен?

    • @PRODvigateL
      @PRODvigateL  2 года назад

      привет. лицензия может подойти на 2-3 компа примерно, больше не даст и возможно вообще не даст активировать, даже там где стояла. матплату или процессор поменял - уже другой компьютер - может подойти лицензия может нет. Редакцию виндовс не перепутали? может стояла домашняя а ставите про?

    • @dust3316
      @dust3316 2 года назад +1

      @@PRODvigateL не редакция тоже про была,активировал KMS ) поменялся ключ,вел ключ подошел,во как)

    • @PRODvigateL
      @PRODvigateL  2 года назад +1

      @@dust3316 интересно, )

  • @slywin8558
    @slywin8558 2 года назад +3

    у меня выдает рабочий ключ а не материнки.

  • @krushon
    @krushon Год назад +1

    благодарю

  • @monexyy_me3571
    @monexyy_me3571 2 месяца назад

    хз я когда виндовс 10 скачивал ниче не писалось типо не правильно говорилось

  • @user-zt4mq4vs7j
    @user-zt4mq4vs7j Год назад +1

    Красава

  • @flying_joker112
    @flying_joker112 Год назад +1

    Все работает

  • @invisible13.37
    @invisible13.37 Год назад +2

    что делать если просто выводит куча B

    • @PRODvigateL
      @PRODvigateL  Год назад

      если иероглифы, то как то кодировку системы нужно поменять. я не помню.
      или если виндовс типа ltsb ltsc - может из за этого. этот код выводит с обычных виндовс- домашней, про

  • @Maryyyyyyyyyyyy
    @Maryyyyyyyyyyyy Год назад +2

    Мне пишет что ключ продукта не подходит что делать

    • @PRODvigateL
      @PRODvigateL  Год назад

      Вы, наверное, не правильно поняли. Этот скрипт только показывает уже установленный ключ. И все.
      Установка ключей - это другое. Ищите другой ключ.

    • @Maryyyyyyyyyyyy
      @Maryyyyyyyyyyyy Год назад +1

      @@PRODvigateL А как найти другой ключ?

    • @PRODvigateL
      @PRODvigateL  Год назад +1

      @@Maryyyyyyyyyyyy можно найти на Авито - откройте список бу сломанных ноутбуков - ищите наклейки и берете ключ от вин 7 Домашняя. только 10ка тоже нужна домашняя обязательно.
      Или просто не активируете - все будет итак работать, просто черный экран на рабочем столе и его не поменять.

  • @nikolaitch7578
    @nikolaitch7578 Год назад +1

    Что-то VBS-скрипт тупит, у мен на двух разных компах один и тот же ключ

    • @PRODvigateL
      @PRODvigateL  Год назад

      может быть. ключ одинаковый, а показывает разные?

    • @nikolaitch7578
      @nikolaitch7578 Год назад +1

      @@PRODvigateL нет на двух разных компах key одинаковые, разные id

  • @user-pi8tr7zw6i
    @user-pi8tr7zw6i 2 года назад +4

    Скрипт работает,вроде безвредный

  • @user-ig9yr9ce6x
    @user-ig9yr9ce6x Месяц назад

    скрипт бесполезен - выдает 11 версии ввввввввввввввввввввввв. это некорректные данные

  • @noLKWD_vital
    @noLKWD_vital Год назад +1

    У меня вместо ключа, пишет BBBBB-BBBBB-BBBBB-BBBBB-BBBBB

    • @PRODvigateL
      @PRODvigateL  Год назад

      бывает. иногда китайские иероглифы. что то с кодировкой системы

  • @ivashka8840
    @ivashka8840 Год назад +1

    Всё сделал как на видео.Выдаёт ошибку.

    • @PRODvigateL
      @PRODvigateL  Год назад

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

    • @ivashka8840
      @ivashka8840 Год назад +1

      @@PRODvigateL- Нет не иероглифы.Прошло вроде,тока теперь в ключе написано-нет данных.

    • @ivashka8840
      @ivashka8840 Год назад +1

      @@PRODvigateL- И кстати.Появилось много скрытых папок,которые и не откроешь и не удалишь без разрешения админа.Папки появились в диске куда я закачиваю всякое разное,не системная.

    • @PRODvigateL
      @PRODvigateL  Год назад

      @@ivashka8840 папки не из за скрипта же появились. Что то их там создает. А если ключа нет, значит, наверное пиратка или активатором каким то пользовались

  • @004ham
    @004ham 2 года назад +1

    На 8 скрипт работал, а на 10 и 11 выдаёт номер вида BBBB BBBB BBBB BBBB. Вот так вот.

    • @PRODvigateL
      @PRODvigateL  2 года назад

      Я понял. На 10ке у меня работало. Когда недавно ставил инсайдер префью вин 11 - было тоже так же . Так же когда запускал на ней мсай автобернер то в настройках были китайские иероглифы. Я подумал это как то связано. Что то с кодировкой.
      Сейчас стоит официальная вин11 - как видите работает.

    • @PRODvigateL
      @PRODvigateL  2 года назад

      Виндовс у вас не русская была и вы скачали русский пакет - не так?

    • @004ham
      @004ham 2 года назад +1

      @@PRODvigateL У меня была официальная русская 8.1, затем она обновилась до 10, потом ещё выходили новые сборки 10 и она так же обновлялась до новых версий, потом уже 6 октября обновил до 11. Так вот, как я понял, за эти годы обновлений что-то нарушилось в винде, так как уже на какой-то сборке десятки я пробовал запустить этот скрипт, но получил всё те же ВВВВВ-ВВВВВ и так далее. Что интересно, и Аида так же определяла ключ продукта: ВВВВВ-ВВВВВ-ВВВВВ.... Так вот сегодня я решил произвести чистую установку Windows, поставил - и скрипт сработал, ключ показывает корректно.

  • @user-fi8ju5sz3x
    @user-fi8ju5sz3x Год назад +2

    не получается

    • @PRODvigateL
      @PRODvigateL  Год назад

      каракули выходят наверное. нужно как то кодировку в настройках поменять, сейчас уже не помню.

    • @user-fi8ju5sz3x
      @user-fi8ju5sz3x Год назад

      @@PRODvigateL да

  • @doxidoom
    @doxidoom Год назад +1

    показало все кроме ключа активации