Строка соединения зависит от драйвера, т.е. лучше всего будет почитать доку по нему.
А вот довольно извратный способ получить параметры БД
Процедура ЗапросПараметровИБ(ИмяКластера, ИмяИБ, СерверИБ, ИмяСервераИБ, СерверБД, ИмяБД)
СтрокаСоединенияИнформационнойБазы = СтрокаСоединенияИнформационнойБазы();
ПозицияРазделителя = Найти(СтрокаСоединенияИнформационнойБазы, ";");
ИмяКластера = Сред(СтрокаСоединенияИнформационнойБазы, 7, ПозицияРазделителя - 8);
ИмяИБ = Сред(СтрокаСоединенияИнформационнойБазы, ПозицияРазделителя + 5, СтрДлина(СтрокаСоединенияИнформационнойБазы) - ПозицияРазделителя - 5);
ИмяИБ = СтрЗаменить(ИмяИБ, """", "");
Соединитель = Новый COMОбъект("V82.COMConnector");
АгентСервера = Соединитель.ConnectAgent(ИмяКластера);
КластерыСерверов = АгентСервера.GetClusters().Выгрузить();
ИмяСервераИБВРег = ВРег(ИмяКластера);
Для Каждого Кластер Из КластерыСерверов Цикл
Если ВРег(Кластер.HostName) = ИмяСервераИБВРег Тогда
СерверИнформационнойБазы = Кластер;
СерверИБ = СерверИнформационнойБазы.HostName;
ИмяСервераИБ = СерверИнформационнойБазы.Name;
Прервать;
КонецЕсли;
КонецЦикла;
АдминистраторКластера = "";
ПарольАдминистратораКластера = "";
Пользователь = ...;
ПарольПользователя = ...;
АгентСервера.Authenticate(СерверИнформационнойБазы, АдминистраторКластера, ПарольАдминистратораКластера);
ПроцессыCOM = АгентСервера.GetWorkingProcesses(СерверИнформационнойБазы);
РабочиеПроцессы = ПроцессыCOM.Выгрузить();
РабочийПроцесс = РабочиеПроцессы[0];
//СписокСоединений = РабочиеПроцессы;
СоединениеСРабочимПроцессом = Соединитель.ConnectWorkingProcess(РабочийПроцесс.HostName + ":" + Формат(РабочийПроцесс.MainPort, "ЧГ="));
СоединениеСРабочимПроцессом.AddAuthentication(Пользователь, ПарольПользователя);
// Получение списка информационных баз
ИнформационныеБазы = СоединениеСРабочимПроцессом.GetInfoBases().Выгрузить();
Для Каждого ИБ Из ИнформационныеБазы Цикл
// Если информационная база найдена
Если ВРег(ИБ.Name) = ВРег(ИмяИБ) Тогда
// Запомнить информационную базу и прекратить поиск
ИмяБД = ИБ.DBName;
СерверБД = ИБ.DBServerName;
//ИБ.DBUser
Прервать;
КонецЕсли;
КонецЦикла;
КонецПроцедуры //ЗапросПараметровИБ
Основное неудобство в том, что в коде надо явно указать пользователя и его пароль, имеющего админские права. У себя для этой цели я завел роль, у которой есть ТОЛЬКО админское право. это дыра, но о ней надо знать ... этот юзер отсутствует в списке подстановки и имеет многостраничный пароль.
Страницы: 1
Прямые запросы 1С8 (число прочтений - 5667 )
