Имя пользователя:
Пароль:
 

Название темы: delete C:\*.* /exclude=zzz.lst ?
Показать сообщение отдельно

Аватара для semiono

Ветеран


Сообщения: 842
Благодарности: 33

Профиль | Отправить PM | Цитировать


Точно! Всё легко получилось, просто ифов понаставил как есть, я думал сложнее будет!
Кстати в хелпе мало написанно, я бы ещё долго думал, как If @OSArch = "x86" Then составить,
я бы комплексовал бы, как обычно кода боюсь.
Код: Выделить весь код
If @OSArch = "x86" Then
$InstallDir = RegRead("HKLM\Software\Native Instruments\AkoustikPiano","InstallDir")
$file = FileOpen($InstallDir & "\AkoustikPiano.reg", 10)
FileWrite($file, "Windows Registry Editor Version 5.00" & @CRLF & @CRLF)
FileWrite($file, "[HKEY_LOCAL_MACHINE\Software\Native Instruments\AkoustikPiano]" & @CRLF)
FileWrite($file, """SYSTEMID""=" & $sysID & "" & @CRLF & @CRLF)
FileClose($file)
EndIf

If @OSArch = "x64" Then
$InstallDir = RegRead("HKLM\Software\Wow6432Node\Native Instruments\AkoustikPiano","InstallDir")
$file = FileOpen($InstallDir & "\AkoustikPiano.reg", 10)
FileWrite($file, "Windows Registry Editor Version 5.00" & @CRLF & @CRLF)
FileWrite($file, "[HKEY_LOCAL_MACHINE\Software\Wow6432Node\Native Instruments\AkoustikPiano]" & @CRLF)
FileWrite($file, """SYSTEMID""=" & $sysID & "" & @CRLF & @CRLF)
FileClose($file)
EndIf
Жалко что reg.exe export отдельные value не сохраняет в файл, а в InnoSetup даже RegRead не нашлось,
пришлось к AutoIt обращаться, как всегда только это и выручает!

-------
Полезное сообщение


Отправлено: 00:41, 16-06-2009 | #12

Название темы: delete C:\*.* /exclude=zzz.lst ?