Перегрузка 7

19.03.15

✎

16:29

Если  Контр8.НайтиПоНаименованию(Контр7.Наименование) = 1 Тогда
                    Иначе
                        КонтрПапка = Контр8.СоздатьГруппу();
                        КонтрПапка.Наименование = Контр7.Наименование;
                        КонтрПапка.Записать();
                    КонецЕсли;

Почему она у меня раз за разом не находит? Да еще и за 1 проход по 2 папки создает!

1 salvator

19.03.15

✎

16:31

Потому что НайтиПоНаименованию возвращает ссылку на справочник.

2 vicof

19.03.15

✎

16:32

Потому что по наименование не совпадает с искомым.
Потому что не находит.
Ваш кэп.

3 vicof

19.03.15

✎

16:32

(1) +1

4 vicof

19.03.15

✎

16:32

(0) А вообще вся проблема в прокладке.

5 Мисти

19.03.15

✎

16:35

Кажется, уже исправила.
А вот еще:
Подключает нормально:
    Подключение = СоздатьОбъект("V83.COMConnector");//  V83.Application
    попытка
        Если ИспользуетсяСервер1С = 1 тогда
            БазаОле = Подключение.Connect("Srvr= """+СокрЛП(Сервер1С)+""""+";Ref="+СокрЛП(ПутьКБазе)+";Usr=""" + СокрЛП(Пользователь) +""""+";Pwd="""+ СокрЛП(Пароль)+""";");
        Иначе
            БазаОле = Подключение.Connect("File=""" + СокрЛП(ПутьКБазе) + """; Usr=""" + СокрЛП(Пользователь) + """; Pwd=""" + СокрЛП(Пароль) + """");
        КонецЕсли;

А как отключить?
У меня написано - БазаОле = ""
При этом с ошибкой закрывается 7.

6 Мисти

19.03.15

✎

16:37

КонтрПапка = Контр8.НайтиПоНаименованию(Контр7.Наименование);
                    Если  КонтрПапка = Контр8.ПустаяСсылка()  Тогда
                        КонтрПапка = Контр8.СоздатьГруппу();
                        КонтрПапка.Наименование = Контр7.Наименование;
                        КонтрПапка.Записать();
                    КонецЕсли;

7 zak555

19.03.15

✎

16:38

что за ковнокод ?

8 zak555

19.03.15

✎

16:39

(5) Делюсь переходом от строки соединения к запуску.

9 salvator

19.03.15