Войти

Показать полную графическую версию : [решено] Часовой пояс


thebas
06-05-2009, 11:35
Вот незнаю как сменить сабж на компах в домене.
Пытался наваять скрипт и менять в реестре.
Менять то меняется но видимых изменений не происходит, подскажите как поступить.


On Error Resume Next
strComputer = "."
RegPath="SYSTEM\CurrentControlSet\Control\TimeZoneInformation"
const HKEY_LOCAL_MACHINE = &H80000002
Set oReg=GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & _
strComputer & "\root\default:StdRegProv")

RegName="ActiveTimeBias"
RegValue=4294967116
oReg.SetDWORDValue HKEY_LOCAL_MACHINE,RegPath,_
RegName,RegValue

RegName="Bias"
RegValue=4294967176
oReg.SetDWORDValue HKEY_LOCAL_MACHINE,RegPath,_
RegName,RegValue

RegName="DaylightBias"
RegValue=4294967236
oReg.SetDWORDValue HKEY_LOCAL_MACHINE,RegPath,_
RegName,RegValue

RegName="StandardBias"
RegValue=0
oReg.SetDWORDValue HKEY_LOCAL_MACHINE,RegPath,_
RegName,RegValue


RegName="DaylightStart"
RegValue=Array(0,0,3,0,5,0,3,0,0,0,0,0,0,0,0,0)
oReg.SetBinaryValue HKEY_LOCAL_MACHINE,RegPath,_
RegName,RegValue

RegName="StandardStart"
RegValue=Array(0,0,10,0,5,0,4,0,0,0,0,0,0,0,0,0)
oReg.SetBinaryValue HKEY_LOCAL_MACHINE,RegPath,_
RegName,RegValue

RegName="DaylightName"
RegValue="Финляндия (лето)"
oReg.SetStringValue HKEY_LOCAL_MACHINE,RegPath,_
RegName,RegValue

RegName="StandardName"
RegValue="Финляндия (зима)"
oReg.SetStringValue HKEY_LOCAL_MACHINE,RegPath,_
RegName,RegValue

Petya V4sechkin
06-05-2009, 12:41
thebas, можно без VBS, пример для зоны "(GMT+02:00) Вильнюс, Киев, Рига, София, Таллинн, Хельсинки":
Control.exe Timedate.cpl,,/Z FLE Standard Time

thebas
06-05-2009, 15:41
Остался маленький вопросик откуда такие параметры для cpl-ки и плз ссылку на чето почитать по етой теме.

Vadikan
10-05-2009, 01:18
thebas, На заметку. Перечень системных команд. (http://forum.oszone.net/thread-109006.html)




© OSzone.net 2001-2012