helpf.pro
Регистрация
 +1 
Распечатать

1С 8.x : Как посмотреть список баз, зарегистрированных в выбранном кластере?

Код 1C v 8.х
 // В приведенном примере производится подключение к агенту сервера, выбирается первый кластер. 
// Для этого кластера получается список информационных баз, который затем обходится в цикле.

Соединитель = Новый COMObject("V81.COMConnector");

ИмяМашины = "SERVANT";
Порт = "1540";
СтрокаСоединения = "TCP://" + ИмяМашины + ":" + Порт;

СоединениеСАгентом = Соединитель.ConnectAgent(СтрокаСоединения);
МассивКластеров = СоединениеСАгентом.GetClusters();

// получается первый массив кластера.
ОписаниеКластера = МассивКластеров.GetValue(МассивКластеров.GetLowerBound());

// в случае если определены администраторы кластера, должны быть указаны данные о логине.
СоединениеСАгентом.authenticate(ОписаниеКластера, " ", " ");

МассивБаз = СоединениеСАгентом.GetInfoBases(ОписаниеКластера);
МаксимальныйИндекс = МассивБаз.GetUpperBound();

Для ТекущийИндекс = МассивБаз.GetLowerBound() По МаксимальныйИндекс Цикл
ОписаниеБазы = МассивБаз.GetValue(ТекущийИндекс);

Сообщить(ОписаниеБазы.Descr);
Сообщить(ОписаниеБазы.Name);

КонецЦикла;
Разместил:   Версии: | 8.x |  Дата:   Прочитано: 18152
 +1 
Распечатать
Возможно, вас также заинтересует
Автоматическое резервное копирование 1С:Предприятия в облако с помощью ПО Effector Saver 4
Всем известно, для большей гарантии восстановления важных данных, необходимо копировать архивы в несколько мест хранения. Отдельный диск может помочь в случае порчи основного, но в случае если устройство будет потеряно или украдено, он будет так же
Автоматическое резервное копирование 1С:Предприятия в облако с помощью ПО Effector Saver 0
Всем известно, для большей гарантии восстановления важных данных, необходимо копировать архивы в несколько мест хранения. Отдельный диск может помочь в случае порчи основного, но в случае если устройство будет потеряно или украдено, он будет так же
Как в ЗУПе выбрать всех сотрудников, когда-либо работавших в выбранном подразделении? 3
Как в ЗУПе выбрать всех сотрудников, когда-либо работавших в выбранном подразделении и изменить у них значение указанного реквизита. Запрос=Новый Запрос; Запрос.Текст=" |ВЫБРАТЬ РАЗЛИЧНЫЕ | РаботникиОрганизаций.Сотрудник, | РаботникиОрганизаций
Метод ЗаписатьВФорме() - Запись и проведение документа в форме 2
Для понимания особенностей записи и проведения документа в форме следует, прежде всего, разделять особенности записи самого объекта ( ДокументОбъект ) и особенности работы расширения формы. Расширение формы документа действует, если основной реквизит
Настройка и оптимизация сервера, кластера 8.3 15
Ставя очередное обновление Бухгалтерии получил ошибку " Я работаю только на 8.3.4" , ну вот... пришло время поставить 8.3.4. и так: Процесс скачивания и установки новой платформы я описывать не буду, там все просто. Служба Агент Сервера 1С По умо
Посмотреть все результаты поиска похожих
Вы не можете отправить комментарий анонимно, пожалуйста войдите или зарегистрируйтесь.