|
v7: Работа с NTP |
☑ |
0
adm1nb3k
13.06.15
✎
10:14
|
Собственно, задача: Получить московское время с какого-нибудь NTP-сервера.
Прошу поделиться опытом.
|
|
1
Снежный человек
13.06.15
✎
10:26
|
|
|
2
adm1nb3k
13.06.15
✎
10:44
|
(1). Спасибо. Я посмотрел. Но там на 8-ке. А мне нужен на 7-ке.
|
|
3
ДенисЧ
13.06.15
✎
10:47
|
так возми v7plus и перепиши...
Делов-то...
|
|
4
adm1nb3k
13.06.15
✎
11:07
|
Всем спасибо. Написал свой скрипт. Тупо, но работает.
Функция ПолучитьДату()
ПеремТекущаяДата = "";
Попытка
Ф = ""+КаталогВременныхФайлов()+"\date.txt";
Объект = СоздатьОбъект("wscript.shell");
КомандаСистемы("w32tm /stripchart /computer:time.nist.gov /samples:1>"+Ф+"");
Исключение
Сообщить(ОписаниеОшибки());
Возврат ПеремТекущаяДата;
КонецПопытки;
Текст=СоздатьОбъект("Текст");
Текст.Открыть(Ф);
Для ст=0 по Текст.КоличествоСтрок() Цикл
Если ст=3 Тогда
ПеремТекущаяДата = Сред(Текст.ПолучитьСтроку(ст),17,10);
КонецЕсли;
КонецЦикла;
Возврат ПеремТекущаяДата;
КонецФункции
|
|
5
ДенисЧ
13.06.15
✎
11:14
|
" Текст.Открыть(Ф);
Для ст=0 по Текст.КоличествоСтрок() Цикл
Если ст=3 Тогда
"
Мда... Стенку подсказать? Или сам найдёшь?
|
|
6
adm1nb3k
13.06.15
✎
11:26
|
(5). Да я просто по спешке скопировал код по обработке txt файла. А так, знаю что кода можно упростить до 1 строки.
|
|