Имя: Пароль:
1C
 
Загрузка из open office в 1С
0 below10
 
15.05.07
15:40
При загрузке в 1С из XLS я использую TOpenOffice.Bridge вот текст:

Попытка
   ТаблицаЦен.Очистить();
   OO= новый COMОбъект("TOpenOffice.Bridge");
   OO.Open(ИмяФайла);
   й = 2;
   Значение= OO.Worksheets(1).Cells(й,1).Value;
           
   Пока Значение <> "" Цикл    
       Товар= Справочники.Номенклатура.НайтиПоКоду(Формат(Значение,"ЧГ=0"));
       ЦенаЗП= OO.Worksheets(1).Cells(й,3).Value;            ЦенаП= OO.Worksheets(1).Cells(й,4).Value;            ЦенаР= OO.Worksheets(1).Cells(й,5).Value;                        
       Если НЕ Товар.Пустая() Тогда
           НоваяСтрока = ТаблицаЦен.Добавить();
           НоваяСтрока.Номенклатура = Товар.Ссылка;
           ПриИзмененииНоменклатуры(НоваяСтрока);                НоваяСтрока.Цена0= Число(СтрЗаменить(ЦенаЗП,"р.",""));
           НоваяСтрока.Валюта0= ВыбВалюта;
           НоваяСтрока.Цена1= Число(СтрЗаменить(ЦенаП,"р.",""));
           НоваяСтрока.Валюта1= ВыбВалюта;
           НоваяСтрока.Цена2= Число(СтрЗаменить(ЦенаР,"р.",""));            
           НоваяСтрока.Валюта2= ВыбВалюта;
       Иначе
           Сообщить("НЕ НАЙДЕНА НОМЕНКЛАТУРА ПО КОДУ " + Значение);
       КонецЕсли;
                       
       й = й + 1;
       Значение= OO.Worksheets(1).Cells(й,1).Value;            
       КонецЦикла;                
                   
       OO.Close();
       OO=0;
   Исключение
       Сообщить("ОШИБКА ЧТЕНИЯ В EXCEL-ФАЙЛА:"+ОписаниеОшибки());
   КонецПопытки;

Все работает,но открывается сама компонента TOpenOffice.Bridge и файл XLS...
Можно ли как-нибудь этого избежать?
1 ТелепатБот
 
гуру
15.05.07
15:40
2 ZyXEL
 
15.05.07
15:41
у класса есть свойство Visible типа Boolean для XLS файла
3 ZyXEL
 
15.05.07
15:43
а вообще пиши напрямую общение с ОО. и сможешь сам всем управлять
4 below10
 
15.05.07
15:44
Что-то у меня не получается с Visible..может я делаю что не так?
5 ZyXEL
 
15.05.07
15:45
описание с сайта
Visible :Bool видимость основного окна приложения [$]

[$] - функции-заглушки и объекты-затычки не реализованные в данной версии. Всегда возвращают пустую строку или 0 в зависимости от типа объекта.
6 below10
 
15.05.07
15:49
Короче с Visible у меня ничего не выходит
7 ZyXEL
 
15.05.07
18:52
Кстати если закрывать ОО то и окна файла не увидишь..
8 Ковычки
 
15.05.07
20:51
а че ОО по оле некашерно ? нафих тебе левак разный...
9 Ковычки
 
15.05.07
20:52
а визибле скорее всего -1 либо через MSScriptControl
10 ZyXEL
 
16.05.07
09:40
(8) я думаю скорее не умеет чем некашерно..