Подскажите пожалуйста, как можно узнать вариант базы.

Поиском нашелся вот такой способ:
Соединения = ПолучитьСоединенияИнформационнойБазы();
Для каждого СоединениеИнформационнойБазы Из Соединения Цикл
  Если СоединениеИнформационнойБазы.Пользователь.Имя = ИмяПользователя() И  оединениеИнформационнойБазы.ИмяПриложения="1CV8" Тогда
   Если Лев(СтрокаСоединенияИнформационнойБазы(),5)="File=" Тогда
       ФайловыйВариант = Истина;  
   Иначе
       ФайловыйВариант = Ложь;    
   КонецЕсли;    
КонецЕсли;
КонецЦикла;

Какие есть еще способы?

Ошибся секцией?
Вопрос видимо по v8?

(0) А чем этот не нравится?

Ааг, поздно заметил. почему то ушло в 7 ((((

(2) Думаю, может есть способ поизящнее

не понятно только на кой все соединения перебираются? А если их 100?

да,(моя ошибка) там немного другая задача решалась. Поэтому цикл.
Достаточно взять одну строку массива.

СтрокаСоединенияИнформационнойБазы() в помощь
Возвращает только текущее подключение. Но далее алгоритм тот же.

(0) более правильным - использовать директивы #Сервер в привелигерованом модуле



----------------------------------------------
а я вот так использую строку подключения


   
   ЭтоРабочееМесто = Истина;
   Если СокрЛП(ВРЕГ(Константы.КонтрольнаяСтрокаПодключения.Получить()) <> СокрЛП(ВРЕГ(СтрокаСоединенияИнформационнойБазы()))) и (СокрЛП(Константы.КонтрольнаяСтрокаПодключения) <> "") Тогда
       ЭтоРабочееМесто = Ложь;
   КонецЕсли;
   
   // установим заголовок на случай длительных действий
   ЗаголовокСистемы = Константы.ЗаголовокСистемы.Получить();
   
   Если Пустаястрока(ЗаголовокСистемы) Тогда
       ЗаголовокСистемы = Метаданные.Представление();
   КонецЕсли;
   
   Если не ЭтоРабочееМесто Тогда
       //
       // автоматическое удаление всех интеграционных настроек
       //
       ОтключитьКритичныйФункционал ();
       // заодно и заголовок подправим
       ЗаголовокСистемы = "КОПИЯ БАЗЫ [" + ЗаголовокСистемы + "]";
   КонецЕсли;
   
   УстановитьЗаголовокСистемы(ЗаголовокСистемы + " №" + Формат(Константы.НомерВерсииКонфигурации.Получить(), "ЧЦ=6; ЧРГ=.; ЧГ=2,2,2"));

(7),(8) Спасибо!!!