Работа с реестром - Компьютерный форум OSzone.net

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)

- AutoIt (http://forum.oszone.net/forumdisplay.php?f=103)

- - Работа с реестром (http://forum.oszone.net/showthread.php?t=132575)

Работа с реестром

Как возможно с помощью Autolt сохранить целую ветку реестра и по возможности её востановить ?

Код:

ShellExecute("reg","save HKLM\software a:\backup.dat", @SystemDir, "", "@SW_HIDE")

:) сам не проверял, может с ошибками.

Та да, какието ошибки вылазят...

Цитата:

Цитата TERMINAL

какието ошибки вылазят »

Какие именно?

Кстати, немного по теме. Есть расширенная библиотека для работы с реестром.

Цитата:

Цитата TERMINAL

какието ошибки вылазят... »

может тогда на regedit /e c:\hives заменить?
и может там ещё с правами доступа проблеммы.
-----------------------------------------------------------------------------------------------------------------------------------------------------------
Ну не овтопега ради, напишу здесь, ибо не знаю как назвать!
Нужно:

Код:

$VST = RegRead("HKLM\Software\VST","VSTPluginPath","REG_SZ")

If $VST = 0 Then

$VST = "myOtherString"

как это по человечески оформить, или это итак верно? Суть я думаю ясна, но скорее это криво с точки зрения языка?
(всмысле = 0 это типа если не существует такого реестра value или key итп)
-------

кстати, еслиб это был InnoSetup я бы здесь применил Flags: createvalueifdoesntexist и создал бы value,
! хотя в любом случае, мне потом это как $переменная нужна чтоб как $Path подставить в GUI,

Кстати, аналог createvalueifdoesntexist тоже подскажите если это в автоит не сложно...

Цитата:

Цитата semiono

как это по человечески оформить »

Как в справке :), или вы не заглядываете в неё? в RegRead() всего два параметра.

Цитата:

Цитата semiono

аналог createvalueifdoesntexist тоже подскажите если это в автоит не сложно »

А какое там должно заполняться значение? В любом случае, для записи используется RegWrite().

Цитата:

Цитата Creat0R

Как в справке »

Я имею ввиду логические операторы, а не RegRead() хотя и на них справка есть, но боюсь там подобного нет

Код:

If $VST = 0 Then

$VST = "myOtherString"

Или я это корректно написал? Я даже протестить не осмелился, щас заценю, вдруг работает на самом деле!
Creat0R, я бы поизучал логический код, но там всегда примеры офтопичные, не под мои задачи...
мнеб только файлы и реестр "патчить" и более ничего не надо, :) правда условия иногда как тут возникают.

createvalueifdoesntexist - буквально создаёт value в том случае если его ещё нет, в противном случае игнорируется... в автоит тут наверное целый блок с операторами надо наворотить, чего я очень боюсь :)

Цитата:

Цитата semiono

Я даже протестить не осмелился »

А зря, сначала проверяйте, а потом пишите. Зачем просто так плодить вопросы, когда самому можно их решить? разве самому не интереснее? :)

Цитата:

Цитата semiono

я бы поизучал логический код, но там всегда примеры офтопичные, не под мои задачи. »

У вас по всей видимости, просто нет терпения ;)

Цитата:

Цитата semiono

createvalueifdoesntexist - буквально создаёт value в том случае если его ещё нет, в противном случае игнорируется »

Создаёт где, в реестре, или просто заполняет переменную, как в случае с IniRead()?

Если переменную (как я догадываюсь), тогда так:

Код:

$Var = _RegReadEx("HKEY_LOCAL_MACHINE\UnexistingKey", "ValueName", "Some Default Value")



MsgBox(4096, "_RegReadEx", _

    StringFormat("Return @Error: %i\nReturn @Extended: %i\nReturn $Var: %s", @error, @extended, $Var))



Func _RegReadEx($sKeyName, $sValueName, $sDefault="")

    Local $sRet_Value = RegRead($sKeyName, $sValueName)



    If $sRet_Value = "" Then $sRet_Value = $sDefault



    Return SetError(@error, @extended, $sRet_Value)

EndFunc

аааа! я зделал! ВЫ правы я лентяй! как всё просто на самом деле!

Код:

$VST = RegRead("HKLM\Software\VST","VSTPluginsPath")



If $VST = "" Then

$VST = @SystemDir & "\Plugins"

EndIf



MsgBox(4096,"VSTPluginPath",$VST)

Буду терпения набираться теперь!

Цитата:

Цитата Creat0R

Создаёт где, в реестре, »

да, вот кусок
Root: HKLM32; Subkey: "Software\VST"; ValueType: string; ValueName: "VSTPluginsPath";
ValueData: "{sys}\Plugins"; Flags: createvalueifdoesntexist noerror; Permissions: admins-full
очень удобные кстати флаги у инсталлера, просто добавил нужный флаг и готово, хотя там и паскаль есть,
но это когда действительно надо...

ЗЫ как бы тоже получается, что тоже решено - :)

Код:

$VST = RegRead("HKLM\Software\VST","VSTPluginsPath")

If $VST = "" Then

$VST = @SystemDir & "\Plugins"

EndIf

RegWrite("HKLM\Software\VST","VSTPluginsPath","REG_SZ",$VST)

Цитата:

Цитата semiono

да, вот кусок »

Тогда так:

Код:

#include <Registry_UDFs.au3>



$Var = _RegReadEx("HKCU\UnexistingKey", "ValueName", "Some Default Value")



MsgBox(4096, "_RegReadEx", _

    StringFormat("Return @Error: %i\nReturn @Extended: %i\nReturn $Var: %s", @error, @extended, $Var))



Func _RegReadEx($sKeyName, $sValueName, $sDefault="")

    Local $sRet_Value = RegRead($sKeyName, $sValueName)

    If $sRet_Value = "" Then $sRet_Value = RegWrite($sKeyName, $sValueName, _RegGetExtendedType(@extended), $sDefault)



    Return SetError(@error, @extended, $sRet_Value)

EndFunc

Creat0R, Подскажи плз, нужно в ветке реестра (HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Control\hivelist','\REGISTRY\MACHINE\SYSTEM, HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Control\hivelist','\REGISTRY\MACHINE\SOFTWARE и HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Control\hivelist','\REGISTRY\USER) найти запись (\Device\HarddiskVolume2\Windows\System32\config\SYSTEM или \Device\HarddiskVolume2\Windows\System32\config\DEFAULT) и заменить HarddiskVolume2 на HarddiskVolume3, где HarddiskVolume3 это условный показать номера диска, который нужно ещё определить.
Система Windows 7.
Пробовал пока найти номера диска таким методом:

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