[решено] скрипт изменения значения ветки реестра в процессе установки программы

Iska · Отправлено: **20:20, 25-03-2012** | #2

Каков глубинный смысл менять именно «в процессе»? Дожидаемся окончания процесса установки и меняем значение параметра.

adima · Отправлено: **21:12, 25-03-2012** | #3

смысл в том что это антивирус и когда установился он защищает ветки реестра от изменений

ferget · Отправлено: **23:01, 25-03-2012** | #4

отключить антивирус, поменять значение, включить антивирус

Iska · Отправлено: **23:04, 25-03-2012** | #5

1. Какой антивирус?
2. Проверьте, есть ли возможность внести изменения до установки — не «затрёт» ли антивирус его своим значением при установке.
3. Если это продолжение уже имевшегося обсуждения в какой-либо из имеющихся тем на форуме — есть смысл привести на него ссылку здесь.

adima · Отправлено: **15:04, 26-03-2012** | #6

1.ESET Антивирус
2. Возможность есть

Скрипт я нашел но есть прoблемы:

$path = "HKEY_LOCAL_MACHINE\SOFTWARE\7-Zip";
Dim $minidb[1];
For $i=1 To 10
$val=RegEnumVal($path, $i);
If (@error<>0) Then ExitLoop
ReDim $minidb[$i];
$minidb[$i-1]=$val;
Next
While 1
For $i=1 To 10
$val=RegEnumVal($path, $i);
If (@error<>0) Then ExitLoop
If $minidb[$i-1]<>$val Then ;;;;;
MsgBox(48,"Test", "Обнаружены изменения!")
EndIf
Next
WEnd

Проблема:
Через раз вылетает с ошибкой ;;;;; Array variable has incorrect number of subscripts or subscript dimension range exceeded

Iska · Отправлено: **06:21, 27-03-2012** | #7

Что-то не очень понятное. Всё, что Вам нужно — читать и ждать:

Код:

AutoItSetOption("MustDeclareVars", 1)

Local $sSubKey    = "HKEY_LOCAL_MACHINE\SOFTWARE\7-Zip"
Local $sValueName = "Path2"
Local $sValue

Do
	Sleep(100)

	$sValue = RegRead($sSubKey, $sValueName)
Until $sValue <> ""

MsgBox(48, "Параметр создан", "[" & $sSubKey & "\" & $sValueName & "] = " & $sValue)

Iska · Отправлено: **09:38, 27-03-2012** | #8

Дополнение: в вышеприведённом коде подразумевается, что созданный параметр будет не пустой. Иначе так и будет крутиться внутри цикла до бесконечности.