helpf.pro
Регистрация
 0 
Распечатать

1С 8.x : Синхронизация системного Времени по запросу

Реализовано для защиты от "умных" пользователей, которые делают то что не нужно делать (ручное изменение даты и времени). В рабочей конфигурации используется при синхронизации времени в ЭККА (кассовый аппарат) при закрытии рабочей смены.
Код 1C v 8.х
 Процедура КнопкаВыполнитьНажатие(Кнопка)
ЭлементыФормы.ТекВремя.Заголовок = ТекущаяДата();
Батник = Новый ТекстовыйДокумент;
Батник.ДобавитьСтроку("echo off");
Батник.ДобавитьСтроку("w32tm /config /syncfromflags:manual /manualpeerlist:ntp.time.in.ua");
Батник.ДобавитьСтроку("w32tm /config /update");
Батник.ДобавитьСтроку("w32tm /resync > c:\res_set_time.txt");
Батник.Записать("c:\settime.bat",КодировкаТекста.OEM);

WshShell = Новый COMОбъект("WScript.Shell");
//WshExec = WshShell.Exec("c:\settime.bat");
СтрокаЗапуска = "c:\settime.bat";
WshShell.Run(СтрокаЗапуска,0,Истина);

Результат = Новый ТекстовыйДокумент;
Попытка
Результат.Прочитать("c:\res_set_time.txt",КодировкаТекста.OEM);
Исключение
Сообщить("Ошибка открытия файла!");
Возврат;
КонецПопытки;
Рез = Результат.ПолучитьСтроку(2);
Сообщить(?(Найти(Рез,"успешно") > 0,"ОК!","Не удалось"));
Попытка
УдалитьФайлы("c:\settime.bat");
УдалитьФайлы("c:\res_set_time.txt");
Исключение
КонецПопытки;
ЭлементыФормы.ТекВремя.Заголовок = ТекущаяДата();
КонецПроцедуры
Разместил:   Версии: | 8.x |  Дата:   Прочитано: 6501
 0 
Распечатать
Возможно, вас также заинтересует
17 правил для составления оптимального ЗАПРОСа к данным базы 1С 7
Для формирования и выполнения запросов к таблицам базы данных в платформе 1С используется специальный объект языка программирования Запрос . Создается этот объект вызовом конструкции Новый Запрос . Запрос удобно...
ZIP-архив Чтение 0
Для того чтобы прочитать файлы из ZIP-архива необходимо выполнить несколько простых действий: - Открыть необходимый архив - Распаковать файлы Создание объекта ЧтениеZIPФайла можно осуществить двумя путями - создать...
Ввод дополнительного ежегодного отпуска 1
Вид расчета, используемый для начисления оплаты дополнительного ежегодного отпуска , описывается в плане видов расчета Основные начисления организаций . Новый вид расчета удобнее создать копированием...
Взаимодействие с Контрольно-Кассовыми Машинами (ККМ) 0
Имеется ли возможность взаимодействия конфигурации Управление торговлей с контрольно-кассовыми машинами (ККМ)? Данная возможность реализована в конфигурации в трех вариантах: ККМ в режиме фискального...
Внешние обработки, печатные формы, обработки по заполнению табличных частей 2
Справочник «Внешние обработки, печатные формы, обработки по заполнению табличных частей» содержит список произвольных обработок, произвольных отчетов, дополнительных печатных форм, обработок для заполнения ТЧ...
Посмотреть все результаты поиска похожих
Вы не можете отправить комментарий анонимно, пожалуйста войдите или зарегистрируйтесь.