Функция SetSystemTime

Declare Function SetSystemTime Lib "kernel32.dll" (lpSystemTime As SYSTEMTIME) As Long

Платформа

SetSystemTime устанавливает системные дату и время. Время должно уставливаться по Гринвичу,а не местное время.


В случае ошибки функция возвращает 0 (используйте GetLastError для получения кода ошибки). В успешном случае функция возвращает значение отличное от нуля.
Параметры

lpSystemTime
Новые время и дата для установки системного времени.Параметр wDayOfWeek стуктуры игнорируется.

Пример

' Установим системное время с параметрами:
' Октябрь 3, 1999 16:46:00 по Гринвичу
Dim systime As SYSTEMTIME  ' новое время и дата
Dim retval As Long  ' возвращаемое значение

' Передадим информацию о дате в структуру.
systime.wYear = 1999
systime.wMonth = 10
systime.wDay = 3
systime.wHour = 16
systime.wMinute = 46
systime.wSecond = 0
systime.wMillisecond = 0

' Установим системное время с желаемыми параметрами.
retval = SetSystemTime(systime)

Схожие функции
GetSystemTime
Категория
Время

В начало.