Поскажите, можно ли каким то образом перезагрузить 1С-ку из модуля?
Пробую
однако пока все команды 1С не выполнит, не закрывается... Соответственно, при запуске 1С выдается сообщение "Каталог пользователя занят".
Есть мысли?
Пробую
ЗавершитьРаботуСистемы(0);
КомандаСистемы("update.bat");
ЗапуститьПриложение(ПолучитьПутьК1С()+" /enterprise /d" + AnsiToOem(КаталогИБ()) + " /n" + AnsiToOem(ИмяПользователя()) + " /p");
Есть мысли?
По теме из базы знаний
- Инструкция. Устанавливаем выделенный сервер для 1С:Предприятия и PostgreSQL 8.4 на Ubuntu Server 10.04 LTS
- Коннектор: удобный HTTP-клиент для 1С:Предприятие 8
- Сервер 1С:Предприятие на Ubuntu 16.04 и PostgreSQL 9.6, для тех, кто хочет узнать его вкус. Рецепт от Капитана
- Модульность в 1С – как следовать принципам DRY в реалиях 1С: Предприятие 8.3
- Инструкция по установке Postgres для OLTP приложений и 1С. Часть 1. Базовая конфигурация
Найденные решения
Темп = КаталогПользователя() + "_restart_.cmd";
ФС.УдалитьФайл(Темп);
Текст = СоздатьОбъект("Текст");
//Задержка 11 с. для закрытия 1С
Текст.ДобавитьСтроку("ping -n 11 -w 1000 127.0.0.1 > nul");
//Зовем батник обновления
Текст.ДобавитьСтроку("update.bat");
//Запускаем 1С
Текст.ДобавитьСтроку("start " + КаталогПрограммы() + "1cv7.exe /enterprise /d" + КаталогИБ() + " /n" + ИмяПользователя() + "/p");
Текст.Записать(Темп);
/
WshShell = СоздатьОбъект("WScript.Shell");
WshShell.Run(Темп, 2);
ЗавершитьРаботуСистемы();
Как-то так.
После сборки обработать напильником:)
ФС.УдалитьФайл(Темп);
Текст = СоздатьОбъект("Текст");
//Задержка 11 с. для закрытия 1С
Текст.ДобавитьСтроку("ping -n 11 -w 1000 127.0.0.1 > nul");
//Зовем батник обновления
Текст.ДобавитьСтроку("update.bat");
//Запускаем 1С
Текст.ДобавитьСтроку("start " + КаталогПрограммы() + "1cv7.exe /enterprise /d" + КаталогИБ() + " /n" + ИмяПользователя() + "/p");
Текст.Записать(Темп);
/
WshShell = СоздатьОбъект("WScript.Shell");
WshShell.Run(Темп, 2);
ЗавершитьРаботуСистемы();
Как-то так.
После сборки обработать напильником:)
Остальные ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
Темп = КаталогПользователя() + "_restart_.cmd";
ФС.УдалитьФайл(Темп);
Текст = СоздатьОбъект("Текст");
//Задержка 11 с. для закрытия 1С
Текст.ДобавитьСтроку("ping -n 11 -w 1000 127.0.0.1 > nul");
//Зовем батник обновления
Текст.ДобавитьСтроку("update.bat");
//Запускаем 1С
Текст.ДобавитьСтроку("start " + КаталогПрограммы() + "1cv7.exe /enterprise /d" + КаталогИБ() + " /n" + ИмяПользователя() + "/p");
Текст.Записать(Темп);
/
WshShell = СоздатьОбъект("WScript.Shell");
WshShell.Run(Темп, 2);
ЗавершитьРаботуСистемы();
Как-то так.
После сборки обработать напильником:)
ФС.УдалитьФайл(Темп);
Текст = СоздатьОбъект("Текст");
//Задержка 11 с. для закрытия 1С
Текст.ДобавитьСтроку("ping -n 11 -w 1000 127.0.0.1 > nul");
//Зовем батник обновления
Текст.ДобавитьСтроку("update.bat");
//Запускаем 1С
Текст.ДобавитьСтроку("start " + КаталогПрограммы() + "1cv7.exe /enterprise /d" + КаталогИБ() + " /n" + ИмяПользователя() + "/p");
Текст.Записать(Темп);
/
WshShell = СоздатьОбъект("WScript.Shell");
WshShell.Run(Темп, 2);
ЗавершитьРаботуСистемы();
Как-то так.
После сборки обработать напильником:)
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот