regdelete arbeitet nicht sauber

For $i = 1 to 500
$var = RegEnumVal("HKEY_CURRENT_USERSoftwareMicrosoftInternet ExplorerTypedURLs", $i)
if @error <> 0 Then ExitLoop
$key = RegRead ("HKEY_CURRENT_USERSoftwareMicrosoftInternet ExplorerTypedURLs",$var)
RegDelete ("HKEY_CURRENT_USERSoftwareMicrosoftInternet ExplorerTypedURLs",$var)
GUICtrlSetData($out,"delete: "&$key)
sleep (100)
Next

Wo ist da der Fehler? Mal angenommen es existieren 10 Einträge, dann werden nur 5 gelöscht... :irre:

Das ist doch eigentlich ein ganz simple Sache. Oder sehe ich den Wald vor lauter Bäumen wieder nicht.

Edit:

Auch wenn ich den Sleep auf 1000 erhöhe klappt es nicht.

peethebee : Sorry, das kapier ich jetzt nicht. Wie sollte das ganze dann aussehen? Und woher bekomme ich dann $i?

Den Fehler konnte ich auf jeden Fall eingrenzen:

$var = RegEnumVal("HKEY_CURRENT_USERSoftwareMicrosoftInternet ExplorerTypedURLs", $i)

Hier liest er noch nicht einmal alle Einträge aus.

EDIT:

Danke an peethebee

Hier die Lösung:

For $i = 1 to 500
$var = RegEnumVal("HKEY_CURRENT_USERSoftwareMicrosoftInternet ExplorerTypedURLs", $i)
if @error <> 0 Then ExitLoop
$key = RegRead ("HKEY_CURRENT_USERSoftwareMicrosoftInternet ExplorerTypedURLs",$var)
RegDelete ("HKEY_CURRENT_USERSoftwareMicrosoftInternet ExplorerTypedURLs",$var)
$i=$i-1
GUICtrlSetData($out,"delete: "&$key)
next

Berechtigungen!

Wer weiß was da für Berechtigungen daruf sitzen.
In einer Domänenumgebung sollte man auf so etwas achten

Bin mir zu Hause würde ich das einfach machen.

Genau, standardmässig. Aber warum eine gefahr eingehen, wenn ich sie umgehen kann.