Registry - MRU Werte lassen sich nicht exportieren

mitac100

Hallo,

beim Exportieren der MRU Werte per ini erhalte ich folgende FM:

FEHLER: Ungültige Syntax.

Geben Sie "REG EXPORT /?" ein, um die Syntax anzuzeigen.

Die anderen Schlüssel werden sauber exportiert.

So, werden auch die MRU Werte exportiert.

RunWait(@Comspec & ' /k reg EXPORT "HKEY_CURRENT_USER\Software\Microsoft\Office\16.0\Access\File MRU" Access_16_File_MRU.reg',@ScriptDir & "\Regkeys", @sw_show)

Hat jemand eine Idee woran es liegen könnte?

[Registry]

Jumplistitems_Maximum="HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Advanced"

TypedPaths="HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\TypedPaths"

Network="HKEY_CURRENT_USER\Network"

Control_Panel="HKEY_CURRENT_USER\Control Panel"

Access_16_File_MRU="HKEY_CURRENT_USER\Software\Microsoft\Office\16.0\Access\File MRU"

Access_16_Place_MRU="HKEY_CURRENT_USER\Software\Microsoft\Office\16.0\Access\Place MRU"

Excel_16_File_MRU="HKEY_CURRENT_USER\Software\Microsoft\Office\16.0\Excel\File MRU"

Excel_16_Place_ MRU ="HKEY_CURRENT_USER\Software\Microsoft\Office\16.0\Excel\Place MRU"

OneNote_16_Place_ MRU ="HKEY_CURRENT_USER\Software\Microsoft\Office\16.0\OneNote\Place MRU"

Outlook_16_Profiles="HKEY_CURRENT_USER\Software\Microsoft\Office\16.0\Outlook\Profiles"

Word_16_File_ MRU ="HKEY_CURRENT_USER\Software\Microsoft\Office\16.0\Word\File MRU"

Word_16_Place_MRU="HKEY_CURRENT_USER\Software\Microsoft\Office\16.0\Word\Place MRU"

Code

#include <MsgBoxConstants.au3>

Reg_Export()


Func Reg_Export()
$ini = @scriptdir & "\myBackup.ini"

;~         ; Read the INI section labelled 'General'. This will return a 2 dimensional array.
    Local $aArray = IniReadSection($ini, "Registry")

;~     ; Check if an error occurred.
    If Not @error Then
;~         ; Enumerate through the array displaying the keys and their respective values.
        For $i = 1 To $aArray[0][0]
    
        MsgBox($MB_SYSTEMMODAL, "", "Key: " & $aArray[$i][0] & @CRLF & "Value: " & $aArray[$i][1])

Run(@comspec & ' /k reg export ' & '"' & $aArray[$i][1] & '"' & " " & $aArray[$i][0] & ".reg /Y", @ScriptDir & "\Regkeys", @SW_show)

        Next
    EndIf
EndFunc

Alles anzeigen

**Bitnugger**

C

;-- TIME_STAMP   2017-10-28 04:55:26   v 0.1

#Region    ;************ Includes ************
#Include <AutoItConstants.au3>
;~ #include <Array.au3>
#include <WinAPIMisc.au3>
#EndRegion ;************ Includes ************

Reg_Export()

Func Reg_Export()
    Local $sIniFile = @ScriptDir & "\myBackup.ini", $sOutput, $sCMD, $iPID, $aArray = IniReadSection($sIniFile, "Registry")
    If @error Then Return SetError(1, 0, False)
;~     _ArrayDisplay($aArray, '$aArray')

    For $i = 1 To $aArray[0][0]
        $sCMD = StringFormat('reg.exe EXPORT %s "%s.reg" /y ', $aArray[$i][1], $aArray[$i][0])
        $iPID = Run($sCMD, @ScriptDir & "\Regkeys", @SW_HIDE, $STDERR_CHILD + $STDOUT_CHILD)
        $sOutput = ""
        Do
            $sOutput &= StderrRead($iPID)
        Until @error
        If $sOutput Then
            ConsoleWrite('- $sCMD = ' & $sCMD & @CRLF & '!' & @TAB & '  #Stderr Read: ' & _WinAPI_OemToChar($sOutput))
        Else
            ConsoleWrite('+ $sCMD = ' & $sCMD & @CRLF)
        EndIf
    Next
EndFunc   ;==>Reg_Export

Alles anzeigen

mitac100

Funktioniert

Vielen Dank Bitnugger