Имя: Пароль:
1C
1С v8
Запись изменений GetInfoBases()
0 Servang
 
29.05.20
06:31
Здравствуйте!
ПОдскажите, пожалуйста, как можно записать изменения в настройках базы.
Например, я хочу изменить ScheduledJobsDenied

Для каждого Кластер из Кластеры Цикл
                    
                    Агент.Authenticate(Кластер, , );
                    
                    ИнформационнаяБаза = "";
                    ИнформационнаяБазаНайдена = Ложь;
                    
                    Процессы = Агент.GetWorkingProcesses(Кластер);
                    Для каждого Процесс из Процессы Цикл
                        Порт = Процесс.MainPort;
                        РабПроц = COMСоединитель.ConnectWorkingProcess("WIN-5V7NN9TTHQ5" + ":" + СтрЗаменить(Порт, Символы.НПП, ""));
                        РабПроц.AddAuthentication("Админ", "");
                        
                        InfoBases = РабПроц.GetInfoBases();
                        
                        Для каждого База из InfoBases Цикл
                            Если База.Name = "leK" Тогда
                                ИнформационнаяБаза = База;
                                ИнформационнаяБазаНайдена = Истина;
                                Прервать;
                            КонецЕсли;
                        КонецЦикла;
                        
                        ИнформационнаяБаза.ScheduledJobsDenied = Ложь;
                        
                        //Если ИнформационнаяБазаНайдена Тогда            
                        //    Если не ИнформационнаяБаза.ScheduledJobsDenied тогда
                        //        ИнформационнаяБаза.ScheduledJobsDenied = Истина;
                        //    КонецЕсли;
                        //    Прервать;
                        //КонецЕсли;
                        
                    КонецЦикла;
                    
                    Если не ИнформационнаяБазаНайдена тогда
                        Сообщение = новый СообщениеПользователю;
                        Сообщение.Текст = "Информационная база" + "leK" + " не найдена!";
                        Сообщение.Сообщить();
                    КонецЕсли;    
                    
                КонецЦикла;
1 Servang
 
29.05.20
06:32
Ибо если я просто меня на ложь/истина, то он меняется но не записывается
2 Галахад
 
гуру
29.05.20
07:57
Попробуй

РабПроц.UpdateInfoBase(ИнформационнаяБаза)