1

Тема: CMD/BAT: Просмотр ключа виндовз пакетным файлом (проверьте)

Кому не лениво проверьте работу

echo off
setlocal enabledelayedexpansion
for /f "tokens=3" %%i in ('reg query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion" /v DigitalProductId') do (
    set x=%%~i
    )
for /l %%z in (104,2,132) do (
    set /a array[%%z]=0x!x:~%%z,2!
    )
call :getkey
echo Ключ виндуз: %getkey%
pause > nul
exit /b

:getkey (p) {
    setlocal enabledelayedexpansion
    set out=%~0
    set pc=BCDFGHJKMPQRTVWXY2346789
    set x=0
    for /l %%i in (0,1,28) do (
        if !x! gtr 28 goto break
        set a=0
        for /l %%j in (132,-2,104) do (
            set /a a=array[%%j] + !a! * 256
            set /a array[%%j]="( !a! / 24 ) & 255"
            set /a a%%=24
            set /a n=%%j
            )
        for %%z in (!a!) do set key=!pc:~%%z,1!!key!
        set /a f="( !x! + 2 ) %% 6"
        if !f! equ 0 if !x! lss 28 (
            set /a x+=1
            set key=-!key!
            )
        <nul set /p u=.
        set /a x+=1
        )
:break
    echo.
    endlocal & set %out:~1%=%key%
    exit /b
    }
Я конечно далек от мысли... (с)

2

Re: CMD/BAT: Просмотр ключа виндовз пакетным файлом (проверьте)

Работает, спасибо! Win XP SP3.
Надо перепостить в Коллекцию.

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

3

Re: CMD/BAT: Просмотр ключа виндовз пакетным файлом (проверьте)

Может ты в курсе, все спотыкаюсь на этом, но все никак не займусь "расследованием"

в справке по IF

    EQL - равно
    NEQ - не равно
    LSS - меньше
    LEQ - меньше или равно
    GTR - больше
    GEQ - больше или равно

а на деле
EQU

Знает кто с чем это связано ? (для ошибки больно уж долго это тянется более 10 лет)

Я конечно далек от мысли... (с)

4

Re: CMD/BAT: Просмотр ключа виндовз пакетным файлом (проверьте)

Гугл ведёт только сюда .
Кстати, тоже надо в Коллекцию, раз такое дело.

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

5

Re: CMD/BAT: Просмотр ключа виндовз пакетным файлом (проверьте)

похоже всеж таки ошибка переводчиков

в справке и поддержке EQU

для винХП
ms-its:%windir%\Help\ntcmds.chm::/if.htm

Я конечно далек от мысли... (с)

6

Re: CMD/BAT: Просмотр ключа виндовз пакетным файлом (проверьте)

Ну, слава богу .

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

7

Re: CMD/BAT: Просмотр ключа виндовз пакетным файлом (проверьте)

Проверил. Работает. Windows XP SP2.

8

Re: CMD/BAT: Просмотр ключа виндовз пакетным файлом (проверьте)

Проверил на: 2000 Pro. + SP4, XP Pro. + SP1, 2003 R2 Std. + SP2, 2008 Std. + SP2 (все - 32bit).
Работает везде, кроме 2008.

9 (изменено: Аскет, 2010-11-19 17:47:53)

Re: CMD/BAT: Просмотр ключа виндовз пакетным файлом (проверьте)

smaharbA пишет:

в справке по IF

    EQL - равно
    NEQ - не равно
    LSS - меньше
    LEQ - меньше или равно
    GTR - больше
    GEQ - больше или равно

а на деле
EQU

Знает кто с чем это связано ? (для ошибки больно уж долго это тянется более 10 лет)

Если вы про ">IF /?" то да, но в самом хелпе (XP sp2) всё в порядке:

Оператор Описание
EQU равно
NEQ не равно
LSS меньше
LEQ меньше или равно
GTR больше
GEQ больше или равно

IF /? пишет:

где оператор_сравнения принимает следующие значения:

    EQL - равно
    NEQ - не равно
    LSS - меньше
    LEQ - меньше или равно
    GTR - больше
    GEQ - больше или равно

p.s

ntcmds.chm::/compile_date.htm пишет:

Дата компиляции 01.09.2001

10

Re: CMD/BAT: Просмотр ключа виндовз пакетным файлом (проверьте)

Dmitrii
2008 x64 ?
(а на сколько 2008 отличается от семерки ? Не видел 2008 в живую, не довелось)

Я конечно далек от мысли... (с)

11

Re: CMD/BAT: Просмотр ключа виндовз пакетным файлом (проверьте)

smaharbA пишет:

2008 x64 ?

Нет у нас такой версии.

smaharbA пишет:

... на сколько 2008 отличается от семерки ?

2008, по моим наблюдениям,- почти Vista (у них даже SP2 общий).

12

Re: CMD/BAT: Просмотр ключа виндовз пакетным файлом (проверьте)

Может кто нибудь дать терминальный доступ к 2008 под самым убогим усером на недельку (айпи клиента будет фиксированный) ?

Я конечно далек от мысли... (с)

13

Re: CMD/BAT: Просмотр ключа виндовз пакетным файлом (проверьте)

smaharbA, спасибо! Добавил в Коллекцию: CMD/BAT: Получение ProductKey установленной Windows. Сама идея использовать метку как имя функции весьма интересна. Идея Ваша (я хочу добавить эту идею в CMD/BAT: возврат значений из процедур через параметры)?

P.S. Дополнительно я решил исправить (и исправил) заголовок старой темы в Коллекции с «VBScript: Получение регистр. ключей установленных Windows и MS Office» на VBScript: Получение ProductKey установленных Windows и MS Office, потому как, думаю, «ProductKey» встречается в поисковых запросах чаще, нежели «регистр* ключ*». Добавил в обе темы перекрестные ссылки.

14

Re: CMD/BAT: Просмотр ключа виндовз пакетным файлом (проверьте)

smaharbA, как я понимаю, теоретически, аналогичным путём: CMD/BAT: Поиск в реестре можно найти и ProductKey для Office?

15 (изменено: smaharbA, 2010-11-22 08:04:27)

Re: CMD/BAT: Просмотр ключа виндовз пакетным файлом (проверьте)

Да, с меткой как функцией мудрил как то )) хотелось красивости в пакетном файле

для офиса абсолютно так же, только другой ключ реестра

Я конечно далек от мысли... (с)

16

Re: CMD/BAT: Просмотр ключа виндовз пакетным файлом (проверьте)

off:

smaharbA пишет:

Может кто нибудь дать терминальный доступ к 2008 под самым убогим усером на недельку (айпи клиента будет фиксированный) ?

Может быть это подойдет? VMWare образ с установленной Windows 2008 R2 x64 EE VL (софт легальный).

17 (изменено: jite, 2010-11-24 21:25:20)

Re: CMD/BAT: Просмотр ключа виндовз пакетным файлом (проверьте)

Проверка под Windows 2008 SP2 64bit (база Vista), 2008 r2 64bit (база 7), Windows 7 профессиональная 32bit (6.1.7600) с правами админа:

.........................
Ключ виндуз: BBBBB-BBBBB-BBBBB-BBBBB-BBBBB

Не работает.

upd
И правда, рано заключил, что не работает. Как сравню с результатами альт. средств извлечения, отпишусь.

18 (изменено: DnsIs, 2010-11-24 20:44:27)

Re: CMD/BAT: Просмотр ключа виндовз пакетным файлом (проверьте)

В просторах интернета наткнулся

...не будет возвращать установочный ключ для VLK систем Windows Vista и Windows Server 2008, которые были активированы через KMS сервер. Здесь ключ будет показан только для OEM и коробочных версий. На сколько я знаю в данном случае (как у меня на нотебуке с Vista Business) при активации через KMS ключ не хранится в системе и скрипт будет возвращать буквы B:
объяснение этому здесь: http://www.rjlsoftware.com/support/faq/ … 9&n=81...

Нас невозможно сбить с пути, нам пофигу куда идти.

19

Re: CMD/BAT: Просмотр ключа виндовз пакетным файлом (проверьте)

Под Windows 7 работает. Видимо и под 2008.
В случаях с BBBB дело в иной активации, альтернативные средства выдают то же.

20

Re: CMD/BAT: Просмотр ключа виндовз пакетным файлом (проверьте)

smaharbA пишет:
alexii пишет:

Сама идея использовать метку как имя функции весьма интересна. Идея Ваша (я хочу добавить эту идею в CMD/BAT: возврат значений из процедур через параметры)?

Да, с меткой как функцией мудрил как то )) хотелось красивости в пакетном файле

Спасибо! Добавил новым постом в Коллекцию.