Переход на летнее время

@frostyfull · Регистрация: 13.06.2014

Студворк — интернет-сервис помощи студентам

Всем привет
Нужен срочно хелп, как возможно вы знаете после НГ произошел какой-то баг, на всех компьютерах с WinXP время переводится на час вперед.
У самих пользователей прав нет, а бегать ко всем я уже запарился, из-за этого собственно и времени нет, чтобы подумать как решить эту проблему или хотя бы погуглить. Нашел старое обновление от 2011 года, если его ставить то время становится нормальным, но на следующий день опять слетает. И массово его накатить нельзя, потому что оно было 3 года назад и в истории обновлений оно записано и не дает устанавливать дважды
Подскажите как быть?
Потому что это жесть, из-за этого у юзверей нет доступа к файловым серверам и ругается 1с

Charles Kludge · 14.01.2015, 14:23

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
On Error Resume Next 
Set WSHShell = CreateObject("WScript.Shell") 
Set WMIOBJ = GetObject("winmgmts:\\.\root\CIMV2") 
Set OSITEM = WMIOBJ.ExecQuery("Select * from WIN32_OperatingSystem where Version < 6 and ProductType=1",,48) 
For Each objItem in OSITEM 
   CUROS=objItem.Version 
Next 
 
If Trim(CUROS)="" Then WSH.QUIT 
 
RegKey = "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Time Zones\Russian Standard Time" 
WSHShell.Run "%SYSTEMROOT%\System32\reg.exe ADD " & CHR(34) & RegKey & CHR(34) & " /v Std /t REG_SZ /d " & CHR(34) & "RTZ 2 (зима)" & CHR(34) & " /f", 0, TRUE 
WSHShell.Run "%SYSTEMROOT%\System32\reg.exe ADD " & CHR(34) & RegKey & CHR(34) & " /v MUI_Display /t REG_SZ /d @tzres.dll,-1830 /f", 0, TRUE 
WSHShell.Run "%SYSTEMROOT%\System32\reg.exe ADD " & CHR(34) & RegKey & CHR(34) & " /v MUI_Std /t REG_SZ /d @tzres.dll,-1832 /f", 0, TRUE 
WSHShell.Run "%SYSTEMROOT%\System32\reg.exe ADD " & CHR(34) & RegKey & CHR(34) & " /v Dlt /t REG_SZ /d " & CHR(34) & "RTZ 2 (лето)" & CHR(34) & " /f", 0, TRUE 
WSHShell.Run "%SYSTEMROOT%\System32\reg.exe ADD " & CHR(34) & RegKey & CHR(34) & " /v MUI_Dlt /t REG_SZ /d @tzres.dll,-1831 /f", 0, TRUE 
WSHShell.Run "%SYSTEMROOT%\System32\reg.exe ADD " & CHR(34) & RegKey & CHR(34) & " /v Display /t REG_SZ /d " & CHR(34) & "(UTC+03:00) Волгоград, Москва, Санкт-Петербург (RTZ 2)" & CHR(34) & " /f", 0, TRUE 
WSHShell.Run "%SYSTEMROOT%\System32\reg.exe ADD " & CHR(34) & RegKey & CHR(34) & " /v TZI /t REG_BINARY /d 4cffffff00000000c4ffffff0000000000000000000000000000000000000000000000000000000000000000 /f", 0, TRUE 
WSHShell.Run "%SYSTEMROOT%\System32\RunDLL32.exe shell32.dll,Control_RunDLL timedate.cpl,,/Z Russian Standard Time",0,True

Взято на сисадминс.ру

@Smitis · 14.01.2015, 14:45

А стандартные функции wsh для работы с реестром, интересно, чем не устраивали?

Charles Kludge · 14.01.2015, 14:53

Smitis, это к автору — мопед не мой.

@frostyfull · 14.01.2015, 16:45 **[ТС]**

Charles Kludge, протестирую, отпишусь)

Добавлено через 1 час 45 минут
Charles Kludge, можешь кинуть ссыль откуда взял скрипт?

@Smitis · 14.01.2015, 19:55

Не по теме:

Сообщение от Charles Kludge

это к автору — мопед не мой

Я так и понял.
Не удивлюсь, если кто-то взял файл файл реестра и конвертнул его в cmd.
Кому-то другому понадобился vbs и он не долго думая взял "готовое решение".
Потом ещё кто-нибудь конвертнёт это в другой язык :)

Dr_Quake · 14.01.2015, 21:20

http://support.microsoft.com/kb/2998527
Руками.

Charles Kludge · 14.01.2015, 21:24

Сообщение от Dr_Quake

Руками.

Там есть багофича. http://geektimes.ru/post/243345/

Dr_Quake · 14.01.2015, 21:28

Да, второй патч забыл. Он неофициальный в смысле kb нету, прямой ссылки нету, есть на WU через маскировку под Embedded XP.

@frostyfull · 20.01.2015, 14:41 **[ТС]**

Charles Kludge, я вот ничего не понял, распиши для чайника)
а сейчас как бы скрипт нормально работает

Новые блоги и статьи Все статьи Все блоги /
Модульная разработка через nuget packages DevAlt 07.03.2026 Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .	Модульный подход на примере F# DevAlt 06.03.2026 В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .	Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование 8Observer8 05.03.2026 Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .	SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D 8Observer8 04.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .
SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий 8Observer8 02.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip Сканируйте QR-код на мобильном и вы увидите, что появится джойстик для управления главным героем. . . .	Реалии Hrethgir 01.03.2026 Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .	Ритм жизни kumehtar 27.02.2026 Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .	SDL3 для Web (WebAssembly): Сборка библиотек: SDL3, Box2D, FreeType, SDL3_ttf, SDL3_mixer и SDL3_image из исходников с помощью CMake и Emscripten 8Observer8 27.02.2026 Недавно вышла версия 3. 4. 2 библиотеки SDL3. На странице официальной релиза доступны исходники, готовые DLL (для x86, x64, arm64), а также библиотеки для разработки под Android, MinGW и Visual Studio. . . .

@frostyfull 34 / 34 / 8 Регистрация: 13.06.2014 Сообщений: 509

	Переход на летнее время 14.01.2015, 11:00. Показов 1022. Ответов 9 Метки нет (Все метки) Всем привет Нужен срочно хелп, как возможно вы знаете после НГ произошел какой-то баг, на всех компьютерах с WinXP время переводится на час вперед. У самих пользователей прав нет, а бегать ко всем я уже запарился, из-за этого собственно и времени нет, чтобы подумать как решить эту проблему или хотя бы погуглить. Нашел старое обновление от 2011 года, если его ставить то время становится нормальным, но на следующий день опять слетает. И массово его накатить нельзя, потому что оно было 3 года назад и в истории обновлений оно записано и не дает устанавливать дважды Подскажите как быть? Потому что это жесть, из-за этого у юзверей нет доступа к файловым серверам и ругается 1с 0

@Smitis 1748 / 353 / 41 Регистрация: 15.10.2012 Сообщений: 550
	14.01.2015, 14:45
	А стандартные функции wsh для работы с реестром, интересно, чем не устраивали? 0

Charles Kludge Клюг 7677 / 3192 / 382 Регистрация: 03.05.2011 Сообщений: 8,380
	14.01.2015, 14:53
	Smitis, это к автору — мопед не мой. 0

@frostyfull 34 / 34 / 8 Регистрация: 13.06.2014 Сообщений: 509
	14.01.2015, 16:45 [ТС]
	Charles Kludge, протестирую, отпишусь) Добавлено через 1 час 45 минут Charles Kludge, можешь кинуть ссыль откуда взял скрипт? 0

Dr_Quake Заблокирован
	14.01.2015, 21:20
	http://support.microsoft.com/kb/2998527 Руками. 0

Dr_Quake Заблокирован
	14.01.2015, 21:28
	Да, второй патч забыл. Он неофициальный в смысле kb нету, прямой ссылки нету, есть на WU через маскировку под Embedded XP. 0

@frostyfull 34 / 34 / 8 Регистрация: 13.06.2014 Сообщений: 509
	20.01.2015, 14:41 [ТС]
	Charles Kludge, я вот ничего не понял, распиши для чайника) а сейчас как бы скрипт нормально работает 0