Имя: Пароль:
1C
1С v8
Не могу закрыть com соединение.
0 Ivan_495
 
04.12.12
12:17
Не могу закрыть com соединение.
Подключаюсь из 8.2 в 8.1
СтрокаПодключения = "Srvr=""A"";Ref=""T"";Usr=""p"";Pwd=""p""";
   Попытка
       БазаУПП = Новый COMОбъект("V81.Application");
       БазаУПП.Connect(СтрокаПодключения);
       ЭлементыФормы.Подкл.ЦветТекстаКнопки = WebЦвета.ЗеленыйЛес;
       
       Сообщить("БАЗА ПОДКЛЮЧЕНА!!!");
   
   БазаУПП=Неопределено;
1 Ivan_495
 
04.12.12
12:17
БазаУПП=Неопределено;
БазаУПП=0; не помогает
2 Cube
 
04.12.12
12:22
Всё, это весь код? Что-то я сомневаюсь...
3 Cube
 
04.12.12
12:23
И почему юзаешь Application, а не COMConnector?
4 Ivan_495
 
04.12.12
12:25
СтрокаПодключения = "Srvr=""A"";Ref=""T"";Usr=""p"";Pwd=""p""";
   Попытка
       БазаУПП = Новый COMОбъект("V81.Application");
       БазаУПП.Connect(СтрокаПодключения);
       ЭлементыФормы.Подкл.ЦветТекстаКнопки = WebЦвета.ЗеленыйЛес;
       
       Сообщить("БАЗА ПОДКЛЮЧЕНА!!!");
   
   БазаУПП=Неопределено;
Исключение
       Сообщить("База не подключена!!!");
       ЭлементыФормы.Подкл.ЦветТекстаКнопки = WebЦвета.Красный;
       БазаУПП = 0;

       Возврат;
   КонецПопытки;
5 zladenuw
 
04.12.12
12:27
БазаУПП .ЗавершитьРаботуСистемы(ЛОжь);
6 Cube
 
04.12.12
12:27
(4) Пробовал БазаУПП.ЗавершитьРаботуСистемыЛожь)?
7 Cube
 
04.12.12
12:28
(5) Ах ты... :)
8 Cube
 
04.12.12
12:28
+(6) Скобку пропустил... :)
9 Галахад
 
гуру
04.12.12
12:29
А так?
УПП = БазаУПП.Connect(СтрокаПодключения);
УПП = Неопределено;
10 zladenuw
 
04.12.12
12:30
(0) пишут что можно еще так
"V81=ПолучитьПустоеЗначение();".
11 Ivan_495
 
04.12.12
12:33
(5) спасибо
12 Reset
 
04.12.12
12:45
(0) Потому что у тебя не com-соединение.
Пример(не точный, но иллюстрирующий) того, что ты пытаешься сделать:
Программа="msWord.exe";
КомандаСистемы(Программа);
Программа=""; // А что это word не закрывается?
Основная теорема систематики: Новые системы плодят новые проблемы.