Registry Schlüssel wie {ABC123...} auslesen

Trolleule

Hallo,
ich möchte einen Wert aus einem speziellen Unterschlüssel auslesen, jedoch überspringt er alle Unterschlüssel die mit {... beginnen wie z.B.
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{173DFE24-DF21-405F-BFB5-ECD367E0900A}

Das ist ein Script aus der AutoIT Hilfe, leicht modifiziert:

Code

For $i= 1 to 10
	$var = RegEnumKey("HKEY_LOCAL_MACHINE\SOFTWARE\MICROSOFT\WINDOWS\CURRENTVERSION\UNINSTALL", $i)
	If @error <> 0 then ExitLoop
	MsgBox(4096, "SubKey #" & $i & " under HKLM\Software: ", $var)
Next

Ausgabe: Er beginnt mit AdressBook

Woran liegt das?

**Schnitzel**

autoit ordnet die " { " anders an als sie in der registry stehen.
beim auslesen kommen erst buchstaben und zahlen und dann sonderzeichen.
d.h. deine Keys die mit { beginnen werden als letztes gelistet

Siehe beispiel:

Spoiler anzeigen

[autoit]

$i = 1
While 1
$var = RegEnumKey("HKEY_LOCAL_MACHINE\SOFTWARE\MICROSOFT\WINDOWS\CURRENTVERSION\UNINSTALL", $i)
If @error <> 0 then ExitLoop
MsgBox(4096, "SubKey #" & $i & " under HKLM\Software: ", $var)
$i += 1
wend
MsgBox(0,"","Fertig")

[/autoit]

Trolleule

oh man, danke

**Schnitzel**

hab dir mal ne kleine funktion geschrieben die alle regkeys sucht die mit einem bestimmten zeichen starten

Spoiler anzeigen

[autoit]

#include <Array.au3>
Global $keys

[/autoit] [autoit][/autoit] [autoit]

$keys = _Find_RegKey("HKEY_LOCAL_MACHINE\SOFTWARE\MICROSOFT\WINDOWS\CURRENTVERSION\UNINSTALL", "{")

[/autoit] [autoit][/autoit] [autoit]

_ArrayDisplay($keys)

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

Func _Find_RegKey($Key, $Start)
Dim $array[1], $i = 1
While 1
$var = RegEnumKey($Key, $i)
If @error <> 0 then ExitLoop
If StringLeft($var, 1) = $Start Then
$array[0] = Ubound($array)
Redim $array[$array[0] + 1]
$array[$array[0]] = $var
EndIf
$i += 1
wend
Return $array
EndFunc

[/autoit]

Trolleule

oh danke wie eifrig von dir, falls ich die mal brauchen sollte weiss ich ja wo ich sie finden kann