v8.x: Запустить приложение через COMОбъект - 1С-ИнтеГрация

v8.x: Запустить приложение через COMОбъект



 

Код 1C v 8.х

 Процедура ЗапуститьПриложениеShell(Команда)

           Попытка

                       Shell = Новый COMОбъект("Shell.Application");

                       Shell.ShellExecute(Команда, "", "", "open", 1);

           Исключение

                       Сообщить(ОписаниеОшибки());

           КонецПопытки;

КонецПроцедуры

 

 

//Пример обращения к процедуре

 

//Запустить Открытие файла

ЗапуститьПриложениеShell("d:\primer.xls");

 

//Запустить Веб-сайт

ЗапуститьПриложениеShell("http://help1c.com");

 

//Запустить Веб-сайт ICQ c информацией о контакте 12345

ЗапуститьПриложениеShell("http://wwp.icq.com/scripts/contact.dll?msgto=12345");

 

//Запустить Отправление письма на Info@help1c.com и в теме указать "Вопрос!" и в тексте "Здравствуй, уважаемый Веб-мастер!"

ЗапуститьПриложениеShell("mailto:Info@help1c.com?Subject=Вопрос!&bodyдравствуй, уважаемый Веб-мастер!");  

 

 



Назад в раздел