Страница 1 из 2 12 Последняя
Показано с 1 по 20 из 29.

Как узнать тип лицензии Windows XP?

  1. #1
    Junior Member Репутация
    Регистрация
    05.09.2008
    Сообщений
    3
    Вес репутации
    57

    Как узнать тип лицензии Windows XP?

    Как узнать тип лицензии Windows XP, установленной на компьютере?
    Вопрос возник по той причине, что предстоит лицензировать имеющиеся Windows. Как я понял, это просто делается для корпоративной лицензии.

  2. Будь в курсе!
    Реклама на VirusInfo

    Надоело быть жертвой? Стань профи по информационной безопасности, получай самую свежую информацию об угрозах и средствах защиты от ведущего российского аналитического центра Anti-Malware.ru:

    Anti-Malware Telegram
     

  3. #2
    Junior Member Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация
    Регистрация
    04.09.2007
    Сообщений
    584
    Вес репутации
    657
    мой компьютер- свойства
    там серийный номер винды
    вот по нему и узнаеш
    если оем то вместо 3 цифр так и будет оем
    первые цивры и есть лицензия типа
    76456-644 (это вроде корпоративка)
    55683-OEM (ну а это и так понятно)
    на моей памяти существует 3 вида лицензии
    ОЕМ
    RETAIL
    CORPORATE
    (инсталяционные диски для них разные)

    насколько знаю систему лицензирования нелицензионной винды то на диске типа оем, реально версия ретайл, но серийники достаточно специфические (подходят только к ретайл версии, хотя обычно встречал что серийник подходящий к ретайл, так-же подходил и к оем)
    есть несколько способов:
    1.переустановка винды поверх.
    2. скачать какойто пакет от мелкомягких и он типа переделает вашу винду под нормальную
    3. поставить с нуля.
    ЗЫ последний вариант имхо самый правильный, мало ли что мелкомягкие там напроверяют

  4. #3
    Junior Member Репутация
    Регистрация
    05.09.2008
    Сообщений
    3
    Вес репутации
    57
    Спасибо!
    Собственно, что я имел ввиду под лицензированием для корпоративной Windows: это статья о смене ключа у Microsoft.
    http://support.microsoft.com/kb/918342

  5. #4
    Junior Member Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация
    Регистрация
    04.09.2007
    Сообщений
    584
    Вес репутации
    657
    незабывай про виды лицензий!
    ключ от корпоративки не встанет на ретайл или оем
    + многие нормальные ключи стали невалидными в сп3 оем

  6. #5
    Junior Member Репутация
    Регистрация
    05.09.2008
    Сообщений
    3
    Вес репутации
    57
    Так мы реально лицензируем купленными ключами. SP у нас 2 или 1.

  7. #6
    Senior Member Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Аватар для Alex Plutoff
    Регистрация
    05.02.2006
    Адрес
    Украина
    Сообщений
    1,728
    Вес репутации
    959
    -это вопрос или утверждение?..
    С уважением,
    Alex Plutoff
    А. ПЛАТОВ

  8. #7
    VIP Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация
    Регистрация
    07.07.2005
    Адрес
    Moscow region
    Сообщений
    30,462
    Вес репутации
    2522
    М.б. кому-нибудь пригодится:

    Q: Чем отличаются друг от друга дистрибутивы Evaluation, Retail
    (OEM) и VL?
    Как определить принадлежность моего дистрибутива к тому или иному
    типу?
    A: Основное различие кроется в файлах OEMBIOS.*
    (находятся в каталоге I386, идентичны во всех языковых версиях и
    сервиспаках),
    один набор используется для Evaluation, Retail и OEM, другой для VL.
    Кроме OEMBIOS.* в процессе активации участвуют ещё несколько файлов.
    В большинстве случаев для превращения Retail в VL достаточно ещё
    трёх файлов.
    Это DPCDLL.DL_, PIDGEN.DLL и SETUPP.INI, а вот они, в отличии от
    OEMBIOS.*,
    зависят от локали дистрибутива и интегрированных в него сервиспаков.
    Например, если у вас есть дистрибутив Windows XP Professional SP2
    Retail или
    OEM, то для его переделки в VL потребуются файлы OEMBIOS-VL.rar,
    VL-SP2-EN.rar
    или VL-SP2-RU.rar (в зависимости от локали дистрибутива). Их нужно
    просто
    распаковать в каталог I386 вашего дистрибутива.
    Чтобы определить тип лицензии имеющегося дистрибутива
    необходимо открыть файл SETUPP.INI (он находится в каталоге I386)
    и посмотреть какие 3 символа находятся в конце второй строки:

    Цитата:[Pid]
    ExtraData=
    Pid=хххххXXX

    если вместо XXX видим:
    270 - VL
    любые другие цифры - Retail
    OEM - OEM.
    Павел
    AVZ HijackThis помощь с 10-00 до 18-00МСК

    Windows7, SEP(work)
    WindowsXP KIS(home)

    На up не реагирую

  9. #8
    Junior Member Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация
    Регистрация
    04.09.2007
    Сообщений
    584
    Вес репутации
    657
    2PavelA
    ваша цитата другого источника малость не совсем достоверна (точнее сам текст несовсем истина), но имхо противоречит правилам данного форума!

    Добавлено через 2 минуты

    DPCDLL.DL_, PIDGEN.DLL это то место где содержится криптобаза ключей активации
    Последний раз редактировалось Virtual; 11.09.2008 в 21:06. Причина: Добавлено

  10. #9
    Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация
    Регистрация
    27.08.2006
    Сообщений
    2,453
    Вес репутации
    0
    Немного офф-топ, но кому интересно:
    1) Product ID можно быстро найти так: запускаем cmd и введём следующую команду:
    Код:
    reg query "hklm\software\microsoft\windows nt\currentversion" /v ProductID
    2) Все данные, насчёт ключа XP находятся в:
    HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion

    3) Из номера под параметром 'DigitalProductId' можно вычислить ключ, который мы ввели при установке Винды. Копируйте нижестоящий vbs-скрипт в текстовый файл и дайте название Show_XP_KEY.vbs или что-нибудь другое по вкусу (самое главное с расширением .vbs).
    Код:
    Rem lookup digital product id from registry
    Set WshShell = WScript.CreateObject("WScript.Shell")
    HexBuf = WshShell.RegRead("HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\DigitalProductId")
    For l = lBound(HexBuf) to uBound(HexBuf)
    tmp=tmp & " "& Hex (HexBuf(l))
    next
    
    WshShell.Popup  "Found Digital Product Id in registry:-" &  _
    "                                                                                                                    " &  _
    "                                                                                                                    " &  _
    "                                                                                                                    " & tmp
    StartOffset = 52
    EndOffset =67
    Dim Digits (24)
    
    Digits (0) = "B" : Digits (1) = "C": Digits (2) = "D": Digits (3) = "F":
    Digits (4) = "G": Digits (5) = "H": Digits (6) = "J": Digits (7) = "K":
    Digits (8) = "M": Digits (9) = "P": Digits (10) = "Q": Digits (11) = "R":
    Digits (12) = "T": Digits (13) = "V": Digits (14) = "W": Digits (15) = "X":
    Digits (16) = "Y": Digits (17) = "2": Digits (18) = "3": Digits (19) = "4":
    Digits (20) = "6" : Digits (21) = "7" : Digits (22) = "8": Digits (23) = "9"
    
    dLen = 29
    sLen = 15
    Dim HexDigitalPID (15)
    Dim Des (30)
    For i = StartOffset to EndOffset
    HexDigitalPID (i-StartOffset) = HexBuf(i)
    tmp2=tmp2 & " "& Hex (HexDigitalPID(i-StartOffset))
    next
    WshShell.Popup  "Found Digital Product Id in registry:-" &  _
    "                                                                                                                    " &  _
    "                                                                                                                    " &  _
    "                                                                                                                    " & tmp & _
    "                                                                                                                  " & _
    "                                                                                                                  " & _
    "                                                                                                                  " & _
    "                                        " & _
    "Found the sequence in the digital product ID. Can you spot it in the row above?  :- " & _
    "                                                                                                                  " &  _
    "                                                                                                                  " & tmp2
    KEYSTRING =""
    for i=dLen-1 to 0 step -1
    if ((i + 1) mod 6) = 0 then
    Des (i) = "-"
    KEYSTRING =KEYSTRING & "-"
    else
    HN = 0
        For N = (sLen -1) to 0 step -1
          Value = ( (HN *2^8 ) Or HexDigitalPID (N))
           HexDigitalPID (N) = Value \ 24
           HN    = (Value mod 24)
    
        next
    
    Des(i) = Digits(HN)
    KEYSTRING =KEYSTRING & Digits(HN)
    end if
    next
    KEYSTRING2 = StrReverse (KEYSTRING)
    WScript.Echo "Your XP Key is:- " & _
    "                                         " & KEYSTRING2
    В целях образования, в трёх шагах (каждый раз нажать 'ОК') вы узнаете ключ, который вы ввели при установке Винды XP (третье окошко). Может годиться когда вы вдруг не можете найти установочный диск...

    Paul
    Последний раз редактировалось XP user; 07.10.2008 в 15:16.

  11. #10
    Senior Member Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Аватар для maXmo
    Регистрация
    21.09.2004
    Сообщений
    1,411
    Вес репутации
    315
    Прикольная штука

  12. #11
    VIP Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация
    Регистрация
    07.07.2005
    Адрес
    Moscow region
    Сообщений
    30,462
    Вес репутации
    2522
    Цитата Сообщение от Virtual Посмотреть сообщение
    2PavelA
    ваша цитата другого источника малость не совсем достоверна (точнее сам текст несовсем истина), но имхо противоречит правилам данного форума!
    Я проверял эти данные и у меня совпадало.
    По поводу противоречий: я не предлагаю вскрывать систему, а просто узнать, что за тип дистрибутива у Вас есть.

    Могу убрать слова о переделке дистрибутива.
    Павел
    AVZ HijackThis помощь с 10-00 до 18-00МСК

    Windows7, SEP(work)
    WindowsXP KIS(home)

    На up не реагирую

  13. #12
    Junior Member Репутация Репутация
    Регистрация
    05.10.2009
    Сообщений
    3
    Вес репутации
    54

    Доработанный скрипт

    Rem lookup digital product id from registry
    Set WshShell = WScript.CreateObject("WScript.Shell")
    HexBuf = WshShell.RegRead("HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\DigitalProductId")
    For l = lBound(HexBuf) to uBound(HexBuf)
    tmp=tmp & " "& Hex (HexBuf(l))
    next

    'WshShell.Popup "Found Digital Product Id in registry: " & _
    '" " & _
    '" " & _
    '" " & tmp
    StartOffset = 52
    EndOffset =67
    Dim Digits (24)

    Digits (0) = "B" : Digits (1) = "C": Digits (2) = "D": Digits (3) = "F":
    Digits (4) = "G": Digits (5) = "H": Digits (6) = "J": Digits (7) = "K":
    Digits (8) = "M": Digits (9) = "P": Digits (10) = "Q": Digits (11) = "R":
    Digits (12) = "T": Digits (13) = "V": Digits (14) = "W": Digits (15) = "X":
    Digits (16) = "Y": Digits (17) = "2": Digits (18) = "3": Digits (19) = "4":
    Digits (20) = "6" : Digits (21) = "7" : Digits (22) = "8": Digits (23) = "9"

    dLen = 29
    sLen = 15
    Dim HexDigitalPID (15)
    Dim Des (30)
    For i = StartOffset to EndOffset
    HexDigitalPID (i-StartOffset) = HexBuf(i)
    tmp2=tmp2 & " "& Hex (HexDigitalPID(i-StartOffset))
    next
    'WshShell.Popup "Found Digital Product Id in registry: " & _
    '" " & _
    '" " & _
    '" " & tmp & _
    '" " & _
    '" " & _
    '" " & _
    '" " & _
    '"Found the sequence in the digital product ID. Can you spot it in the row above? " & _
    '" " & tmp2
    KEYSTRING =""
    for i=dLen-1 to 0 step -1
    if ((i + 1) mod 6) = 0 then
    Des (i) = "-"
    KEYSTRING =KEYSTRING & "-"
    else
    HN = 0
    For N = (sLen -1) to 0 step -1
    Value = ( (HN *2^8 ) Or HexDigitalPID (N))
    HexDigitalPID (N) = Value \ 24
    HN = (Value mod 24)

    next

    Des(i) = Digits(HN)
    KEYSTRING =KEYSTRING & Digits(HN)
    end if
    next
    KEYSTRING2 = StrReverse (KEYSTRING)
    'WScript.Echo "Your XP Key is: " & KEYSTRING2
    WScript.Echo "Thank you!"
    Set WshNetwork = WScript.CreateObject("WScript.Network")
    set wsh1 = WScript.CreateObject("WScript.Shell")
    On Error Resume Next

    User = wsh1.RegRead("HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\RegisteredOwner")
    OS = wsh1.RegRead("HKLM\SOFTWARE\Microsoft\Windows\Curr entVersion\SideBySide\Installations\x86_Microsoft. Windows.Common-Controls_6595b64144ccf1df_6.0.0.0_x-ww_1382d70a\Codebases\OS\\Prompt")
    License = wsh1.RegRead("HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\ProductID")

    Set FSO = CreateObject("Scripting.FileSystemObject")
    Set file = FSO.CreateTextFile("Free.txt",False)
    set file = FSO.OpenTextFile("Free.txt",8)
    file.WriteLine("")
    file.WriteLine(WshNetwork.ComputerName) + " - " + (User)
    file.WriteLine(OS)
    file.WriteLine(License)
    file.WriteLine(KEYSTRING2)
    file.Close

  14. #13
    VIP Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация
    Регистрация
    07.07.2005
    Адрес
    Moscow region
    Сообщений
    30,462
    Вес репутации
    2522
    В тег [Code] заключите, чтобы не было искажений.
    Павел
    AVZ HijackThis помощь с 10-00 до 18-00МСК

    Windows7, SEP(work)
    WindowsXP KIS(home)

    На up не реагирую

  15. #14
    Junior Member Репутация Репутация
    Регистрация
    05.10.2009
    Сообщений
    3
    Вес репутации
    54
    Код:
     
    Rem lookup digital product id from registry
    Set WshShell = WScript.CreateObject("WScript.Shell")
    HexBuf = WshShell.RegRead("HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\DigitalProductId")
    For l = lBound(HexBuf) to uBound(HexBuf)
    tmp=tmp & " "& Hex (HexBuf(l))
    next
    'WshShell.Popup  "Found Digital Product Id in registry: " &  _
    '"                                                                                                                    " &  _
    '"                                                                                                                    " &  _
    '"                                                                                                                    " & tmp
    StartOffset = 52
    EndOffset =67
    Dim Digits (24)
    Digits (0) = "B" : Digits (1) = "C": Digits (2) = "D": Digits (3) = "F":
    Digits (4) = "G": Digits (5) = "H": Digits (6) = "J": Digits (7) = "K":
    Digits (8) = "M": Digits (9) = "P": Digits (10) = "Q": Digits (11) = "R":
    Digits (12) = "T": Digits (13) = "V": Digits (14) = "W": Digits (15) = "X":
    Digits (16) = "Y": Digits (17) = "2": Digits (18) = "3": Digits (19) = "4":
    Digits (20) = "6" : Digits (21) = "7" : Digits (22) = "8": Digits (23) = "9"
    dLen = 29
    sLen = 15
    Dim HexDigitalPID (15)
    Dim Des (30)
    For i = StartOffset to EndOffset
    HexDigitalPID (i-StartOffset) = HexBuf(i)
    tmp2=tmp2 & " "& Hex (HexDigitalPID(i-StartOffset))
    next
    'WshShell.Popup  "Found Digital Product Id in registry: " &  _
    '"                                                                                                                    " &  _
    '"                                                                                                                    " &  _
    '"                                                                                                                    " & tmp & _
    '"                                                                                                                  " & _
    '"                                                                                                                  " & _
    '"                                                                                                                  " & _
    '"                                        " & _
    '"Found the sequence in the digital product ID. Can you spot it in the row above? " &  _
    '"                                                                                                                  " & tmp2
    KEYSTRING =""
    for i=dLen-1 to 0 step -1
    if ((i + 1) mod 6) = 0 then
    Des (i) = "-"
    KEYSTRING =KEYSTRING & "-"
    else
    HN = 0
        For N = (sLen -1) to 0 step -1
          Value = ( (HN *2^8 ) Or HexDigitalPID (N))
           HexDigitalPID (N) = Value \ 24
           HN    = (Value mod 24)
        next
    Des(i) = Digits(HN)
    KEYSTRING =KEYSTRING & Digits(HN)
    end if
    next
    KEYSTRING2 = StrReverse (KEYSTRING)
    'WScript.Echo "Your XP Key is: " & KEYSTRING2
    WScript.Echo "Thank you!"
    Set WshNetwork = WScript.CreateObject("WScript.Network")
    set wsh1 = WScript.CreateObject("WScript.Shell")
    On Error Resume Next
    User = wsh1.RegRead("HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\RegisteredOwner")
    OS = wsh1.RegRead("HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\SideBySide\Installations\x86_Microsoft.Windows.Common-Controls_6595b64144ccf1df_6.0.0.0_x-ww_1382d70a\Codebases\OS\\Prompt")
    License = wsh1.RegRead("HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\ProductID")
    Set FSO = CreateObject("Scripting.FileSystemObject")
    Set file = FSO.CreateTextFile("Free.txt",False)
    set file = FSO.OpenTextFile("Free.txt",8)
    file.WriteLine("")
    file.WriteLine(WshNetwork.ComputerName) + " - " + (User)
    file.WriteLine(OS)
    file.WriteLine(License)
    file.WriteLine(KEYSTRING2)
    file.Close

  16. #15
    Junior Member Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация
    Регистрация
    24.06.2009
    Сообщений
    41
    Вес репутации
    65
    Цитата Сообщение от Virtual Посмотреть сообщение
    незабывай про виды лицензий!
    ключ от корпоративки не встанет на ретайл или оем
    + многие нормальные ключи стали невалидными в сп3 оем
    А что произойдёт, если начал установку корпоративной на ОЕМ.
    Она предложила режим обновления, но кажется начала чистую установку.
    Прервал процесс, т.к. не знаю, подхватит ли драйвера и настройки пользователей?

  17. #16
    Full Member Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация
    Регистрация
    09.12.2009
    Сообщений
    483
    Вес репутации
    710
    Потребует ввести ключ от соответствующей редакции XP, т.е. volume lisence (корпоративная). Ключ от ОЕМ не примет, как триал не встанет.

    Еще есть в природе от МС такой тип лицензирования, как GGS (Get Genuine Solution) - именно для лицензирования пиратской версии. Покупается (т.е. бух. документы д.б. в норме), на системники наклеивается лицензия, WIndows можно не переустанавливать.

  18. #17
    Junior Member Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация
    Регистрация
    24.06.2009
    Сообщений
    41
    Вес репутации
    65
    Цитата Сообщение от Vadim_SVN Посмотреть сообщение
    Потребует ввести ключ от соответствующей редакции XP, т.е. volume lisence (корпоративная).
    Так и есть. Уже проверил. Встала корпоративная поверх ОЕМ, драйвера подхватила и настройки пользователя тоже. Т.е. действительно, в режиме обновления - я напрасно взволновался.
    Попробовал приведённый скрипт запустить у себя на своей корпоративке - отработал нормально - ключ вычислил.
    А ключа от этой ОЕМ и не было. Попробовал скрипт на ней - ничего не показал.

  19. #18
    Full Member Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация
    Регистрация
    09.12.2009
    Сообщений
    483
    Вес репутации
    710
    Цитата Сообщение от бУРов Посмотреть сообщение
    А ключа от этой ОЕМ и не было
    Ну этого не может быть
    Посмотреть ключик можно, например, прогой Win Keyfinder (кстати, и сменить она его позволяет при необходимости)

  20. #19
    Junior Member Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация
    Регистрация
    24.06.2009
    Сообщений
    41
    Вес репутации
    65
    Цитата Сообщение от Vadim_SVN Посмотреть сообщение
    Ну этого не может быть
    Посмотреть ключик можно, например, прогой Win Keyfinder (кстати, и сменить она его позволяет при необходимости)
    Если она его вычисляет, зачем нужно его менять?

  21. #20
    Full Member Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация Репутация
    Регистрация
    09.12.2009
    Сообщений
    483
    Вес репутации
    710
    Цитата Сообщение от бУРов Посмотреть сообщение
    зачем нужно его менять?
    Бывает такая необходимость ...

Страница 1 из 2 12 Последняя

Похожие темы

  1. ошибка лицензии KIS
    От akalibr в разделе Помогите!
    Ответов: 4
    Последнее сообщение: 01.07.2012, 19:27
  2. ошибка проверки лицензии)))
    От dewen в разделе Помогите!
    Ответов: 3
    Последнее сообщение: 29.10.2011, 20:36
  3. Ответов: 1
    Последнее сообщение: 20.04.2010, 18:19
  4. Ответов: 1
    Последнее сообщение: 05.05.2005, 23:34

Свернуть/Развернуть Ваши права в разделе

  • Вы не можете создавать новые темы
  • Вы не можете отвечать в темах
  • Вы не можете прикреплять вложения
  • Вы не можете редактировать свои сообщения
  •  
Page generated in 0.01634 seconds with 19 queries