Win8 Desktophintergrund "Änderungen speichern" per Script

UPIA

hi,

ich möchte die veränderten Registry-Einträge für den Desktophintergrund speichern per Script.
Der Eintrag wird richtig gesetzt, aber das speichern geht nicht.
Habe stundenlang gegooglet, bekomme es aber nicht hin.

Code

Run("RUNDLL32.EXE USER32.DLL,UpdatePerUserSystemParameters ,1 ,True")

oder

Code

ShellExecute("C:\Windows\System32\RUNDLL32.EXE", "user32.dll, UpdatePerUserSystemParameters ,1 ,True")

funzen bei mir ( win8 ) nicht.

Das ganze Script zum Ändern der Diashow-Geschwindigkeit:

Spoiler anzeigen

Code

Global $time = 300 ;default: 5min
If $CmdLine[0] = 1 Then
   $time = $CmdLine[1]
EndIf
If $time < 1 Then $time = 1 EndIf ;minimum 1sec
$time = $time * 1000 ;convert to MsgBox
$time = "0x" & Hex($time)
RegWrite("HKEY_CURRENT_USER\Control Panel\Personalization\Desktop Slideshow", "Interval", "REG_DWORD", $time)
Run("RUNDLL32.EXE USER32.DLL,UpdatePerUserSystemParameters ,1 ,True")