&НаКлиентеНаСервереБезКонтекста
Функция ПолучитьКонтекстВыполнения()
Результат = "";
#Если ТолстыйКлиентОбычноеПриложение Тогда
Результат = Результат + Символы.ПС + "ТолстыйКлиентОбычноеПриложение";
#КонецЕсли
#Если ТолстыйКлиентУправляемоеПриложение Тогда
Результат = Результат + Символы.ПС + "ТолстыйКлиентУправляемоеПриложение ";
#КонецЕсли
#Если ТонкийКлиент Тогда
Результат = Результат + Символы.ПС + "ТонкийКлиент";
#КонецЕсли
#Если ВебКлиент Тогда
Результат = Результат + Символы.ПС + "ВебКлиент";
#КонецЕсли
#Если Клиент Тогда
Результат = Результат + Символы.ПС + "Клиент";
#КонецЕсли
#Если Сервер Тогда
Результат = Результат + Символы.ПС + "Сервер";
#КонецЕсли
#Если ВнешнееСоединение Тогда
Результат = Результат + Символы.ПС + "ВнешнееСоединение";
#КонецЕсли
Возврат СокрЛП(Результат);
КонецФункции
О, спасибо :). В конфе Документооборот очередной касяк нашел. Придется исправлять.
Требовать и эффективности, и гибкости от одной и той же программы — все равно, что искать очаровательную и скромную жену... по-видимому, нам следует остановиться на чем-то одном из двух. Фредерик Брукс-младший