Синхронизация системного времени

[Al Prad]

Здравствуйте!
Есть в сети несколько компьютеров. Стоит задача синхронизировать их системное время.
Предполагаю на одном из них (ведущем) установить программу, считывающую циклично время на ведущих компах и, в случае заданного расхождения между своим временем и считанным, установить программно свое системное время на удаленном компе.
По считыванию времени кое-что нашел, но вот с установкой времени на удаленном компе ничего найти не получается. Направьте, плиз, на путь.
Спасибо.

[VVitafresh]

Почему бы не воспользоваться стандартными средствами Windows?

Синхронизация времени с помощью службы времени Windows из состава Windows XP
How the Windows Time Service Works

[Денис]

Потому что он об этом не знал, лол.

[Al Prad]

Меня еще на гугле не забанили. Хотелось бы ответов по существу, а не петросяновщины.
Спасибо VVitafresh за помощь.

Потому что он об этом не знал, лол.

[Денис]

Чтобы не было петросяновщины, скажем так, надо было сразу написать, что, мол, системная служба не подходит по такой-то причине.
Фактически, можно через ShellExecute запускать консольную команду time из клиентской части приложения.
Что-то типа:

Код: Выделить всё

if ServerSayDoUpdate as Boolean then
    Shell "Time " & Cstr(ServerTime as DateTime), vbHide
end if

[Al Prad]

Чтобы не было петросяновщины, скажем так, надо было сразу написать, что, мол, системная служба не подходит по такой-то причине.
Фактически, можно через ShellExecute запускать консольную команду time из клиентской части приложения.
Что-то типа:

Код: Выделить всё

if ServerSayDoUpdate as Boolean then
    Shell "Time " & Cstr(ServerTime as DateTime), vbHide
end if

Спасио за ответ. Но желательно, чтобы все было только на сервере.

[Денис]

Но желательно, чтобы все было только на сервере.

В смысле?
Что должно быть на сервере?