[FlatX007]

Простите а зачем это нужно ???

[proxy]

FlatX007, а дело в том, что вот такая ситуация:

Задача: необходимо создать файл типа .reg, который будет записывать (или обновлять) данные в реестре велечины типа REG_EXPAND_SZ.
В реестре это будет выглядеть так:

Имя величины: SN Значение величины: VMKJGNDIDNWLDMKJGNDIDNWLD Тип величины: REG_EXPAND_SZ

А вот в .reg файле это будет выглядеть так:

Windows Registry Editor Version 5.00 [HKEY_CURRENT_USER\Software\DashSignature\Knagalis] "SN"=hex(2):56,00,4d,00,4b,00,4a,00,47,00,4e,00,44,00,49,00,44,00,4e,00,57,00,4c,00,44,00,4d,00,4b,0 0,4a,00,47,00,4e,00,44,00,49,00,44,00,4e,00,57,00,4c,00,44,00,00,00

Дело в том, что значения в .reg файле записываются следующим образом:

REG_NONE - hex(0) REG_BINARY - hex(3) или hex REG_DWORD - hex(4) или dword REG_SZ - hex(1) или отсутствие указателя типа REG_EXPAND_SZ - hex(2) REG_MULTI_SZ - hex(7) REG_RESOURCE_LIST - hex(8) REG_FULL_RESOURCE_DESCRIPTOR - hex(9) Если тип задан с использованием префикса "hex", то значение установки должно быть записано в виде последовательности чисел (от 0 до 255), разделённых запятыми. Если тип hex(4), то должно быть 4 числа, а в двойное слово они будут собраны в обратной последовательности (т.е. записаны они должны быть от младшего байта к старшему). Если после префикса hex в скобках указано число 5,6,10 или большее 10, то считается, что тип установки REG_UNKNOWN, а её значение обрабатывается как REG_BINARY. Например, Corel использует тип hex(80000001). Если тип не указан, то значение установки трактуется как символьная строка и должно быть взято в кавычки. Если указан тип dword, то значение установки трактуется как шестнадцатиричное число. Оно должно содержать только символы 0-9, a-f, A-F (без кавычек). Символов может быть от 1 до 8.

Соответсвенно появился интерес накатать функции, для форматирования/перекодировки значений реестового типа REG_BINARY, REG_DWORD, REG_SZ и т.д. в формат .reg файла hex(3), hex(4), hex(1) и т.д.
Для типа REG_EXPAND_SZ, ни чего умней не родилось, как это:

Код:

$sRegKey = 'HKEY_CURRENT_USER\Software\DashSignature\Knagalis'
$sSerial = RegRead($sRegKey, 'SN')

For $i=1 To StringLen($sSerial)
    $sSerialResult &= Hex(Asc(StringMid($sSerial, $i, 1)), 2) & ',00,'
Next
$sSerialResult = 'hex(2):' & $sSerialResult
If StringRight($sSerialResult, 1) == ',' Then $sSerialResult = StringTrimRight($sSerialResult, 1)

$sFileContent = _
    'Windows Registry Editor Version 5.00' & @CRLF & @CRLF & _
    '[' & $sRegKey & ']' & ',00,00' & @CRLF & _
    '"SN"=' & $sSerialResult & @CRLF & @CRLF

Вот и все, в этом и вопрос....осталось немного покодить

[FlatX007]

А что утилита ConvRegToAu3 - неумеет этого делать ?

[proxy]

ConvRegToAu3 »

, благодраю, интересная утилитка .....НО - задача то другая ))

FlatX007, ээ-хеее-ххххххххх......стал бы я возиться если уже все есть? - нет конечно )) конечно может и есть уже, но пока не нашел ))

Задача - с помощью AutoIt создать reg файл. А не из reg файла RegWrite функци... ))

[FlatX007]

А всё допёрло ... я сначало невкурил.

[semiono]

FlatX007, ещё хочу напомнить то, что reg.exe expand /? имеет тоже ограничения.
Я бы хотел иметь замену reg.exe, так как утилита коммандной строки сама по себе хороша,
потому что можно использовать батники, а так же вызывать из InnoSetup,
но стандартная утилита не всё умеет, а жаль.

[SyDr]

Дайте спецификацию .reg файлов. То есть как выглядит в нём каждый из указанных типов значений.
Для любого ли типа необходимо ковертить в hex? Какое условие переноса строки?

[proxy]

Sylver Dragon, а мне дайте 7 миллионов долларов ))))))))))))))))))))))))))
И то есть, почему ни кто не приносит кофе мне в постел?
Где моя любимая кока-кола?? Какие условия возврата d-link барахла? ))))))))))

Спецификацию файлов, типа которых разработан в Miscrosoft....что может быть проще? хотя и не совсем спецификация ((

Какое условие переноса строки? »

По мойму, это для удобочитабельности, т.е., как автору интересней, так и расставляется ..

...ааагрррх, на самом деле форматирование выглядит вот так:

Код:

$sSerial = 'VMKJGNDIDNWLDMKJGNDIDNWLD'
MsgBox(0, $sSerial, Hex(StringToBinary($sSerial, 2), 7))

для других типов необходимо поментья length на соответсвующий типу в Hex......освобожусь, допишу func

[semiono]

Перенос строки я посчитал, смотрите выше:

Минимальная строка содержит 22 байта разделённых запятыми, и начинает убавляться на один байт »

Мне кажется это встроенно в регэдит и не меняется, и скорее всего все типы кроме REG_SZ и DWORD,
будут записываться одинакого, в том числе и переносы. Так как вроде бы нет причины их записывать
иначе. И для переноса строк в MULTI_SZ в самом регфайле ничего не будет предусмотренно,
так как это выполняется самим кодом, а это значит, что там в закрытии строк будут какие-то нули...
два байта или четыре, не знаю... 00,00,00,00 типа того! То-есть само оформление будет обычным,
но байт-контент надо уже контролировать... В InnoSetup переносы в multisz выполняет {break}

Характерные примеры multisz (WinXP)
HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Control\Session Manager
BootExecute =

Код:

autocheck autochk /k:D /k:E /k:F /k:G /k:H /k:I /k:J /k:K /k:L /k:M /k:N /k:O /k:P /k:Q /k:R /k:S /k:T /k:U /k:V /k:W /k:X /k:Y /k:Z *
pgdfgsvc C 1

Вторая строка - запись от Sysinternals PageDefrag утилиты.


Я как-то возился над PendingFileRenameOperating так и не понял ничего, запарился его тестить
перезагрузками