Daylight saving settings.

Kan nogen vise mig et VBS-script hvor man sætter "automatic
adjust clock for daylight savingsettings" på W2K og XP. Er der en anden smart måde at gøre dette på?. evt. fra en commandline.?

Har prøvet med følgende, men det går ned på regwrite. Det er som om at der ikke er adgang til registry på netop dette sted.

Option Explicit
Dim OShell, AutoDayLight
Set OShell = CreateObject ("wscript.shell")
On Error Resume Next
AutoDayLight = OShell.RegRead ("HKLM\System\CurrentControlSet\Control\TimeZoneInformation\DisableAutoDaylightTimeSet")
If Err <> 0 Then WScript.Quit (0)
If AutoDayLight = "1" Then

OShell.RegDelete "HKLM\System\CurrentControlSet\Control\TimeZoneInformation\DisableAutoDaylightTimeSet"
OShell.RegWrite "HKLM\System\CurrentControlSet\Control\TimeZoneInformation\ActiveTimeBias" , "0xFFFFFF88" , "REG_DWORD"
OShell.RegWrite "HKLM\System\CurrentControlSet\Control\TimeZoneInformation\DayLightName" , "W. Europe Daylight Time" , "Reg_SZ"
OShell.RegWrite "HKLM\System\CurrentControlSet\Control\TimeZoneInformation\DaylightBias" , "0xFFFFFFC4" , "REG_DWORD"
OShell.RegWrite "HKLM\System\CurrentControlSet\Control\TimeZoneInformation\DaylightStart" , "00000300050002000000000000000000" , "REG_BINARY"
OShell.Run "net Time \\server /Set /y"
end if