|   |   | 
| 
 | OpenOffice *.xls 1с 8.2 | ☑ | ||
|---|---|---|---|---|
| 0
    
        Nikoss 17.08.12✎ 14:08 | 
        Мне нужно почитать ексельку, а МайксасофтОфиса нет на том компе.
  Будет ли работать: Excel = Новый COMОбъект("Excel.Application"); на ОО? А если никакого офиса вообще нет, как можно почитать ексельку? | |||
| 1
    
        spleen 17.08.12✎ 14:12 | 
        (0)Что с тобой?     | |||
| 2
    
        spleen 17.08.12✎ 14:14 | 
        (0) Вот тут есть компонента http://infostart.ru/public/14480/     | |||
| 3
    
        spleen 17.08.12✎ 14:16 | 
        слушай, а причем тут OpenOffice?     | |||
| 4
    
        andrewks 17.08.12✎ 14:24 | 
        в топку все ВК и оффисы. ADODB.Connection - наше всё     | |||
| 5
    
        Nikoss 17.08.12✎ 14:24 | 
        (3) это не при чем? :) ну значит не причем.
  Ну я думал может есть какой КОМ для ОО... О_о | |||
| 6
    
        Nikoss 17.08.12✎ 14:24 | 
        (4) что это?     | |||
| 7
    
        Nikoss 17.08.12✎ 14:25 | 
        (4) можно пример?     | |||
| 8
    
        andrewks 17.08.12✎ 14:25 | 
        (6) ком-объект такой есть     | |||
| 9
    
        andrewks 17.08.12✎ 14:26 | ||||
| 10
    
        spleen 17.08.12✎ 14:31 | 
        (5) ну если нужен 
  v8: Загрузка из open office в 1С | |||
| 11
    
        Nikoss 17.08.12✎ 14:31 | 
        (10), я так понял это нужно что-то устанавливать на компьютер?     | |||
| 12
    
        Nikoss 17.08.12✎ 14:32 | 
        (11) к (9)     | |||
| 13
    
        Лоботряс 17.08.12✎ 14:33 | 
        Внешний источник данных используй     | |||
| 14
    
        Саша Питерский 17.08.12✎ 15:36 | 
        (0) Вот тебе пример чтения файла с установленным ОО без дополнительных компонент.
  Основное отличие от MS Excel, строки и колонки в параметрах указаны в противоположной последовательности. функция URLИзИмениФайла(Знач ИмяФайла) ИмяФайла = СтрЗаменить(ИмяФайла," ","%20"); ИмяФайла = СтрЗаменить(ИмяФайла,"\","/"); Возврат "file:/" + "/localhost/" + ИмяФайла; Конецфункции OpenOffice = Новый COMОбъект("com.sun.star.ServiceManager"); scr = Новый COMОбъект("MSScriptControl.ScriptControl"); scr.language = "javascript"; scr.eval("MassivParametrov = new Array()"); MassivParametrov = scr.eval("MassivParametrov"); scr.AddObject("OpenOffice", OpenOffice); scr.eval("MassivParametrov[0]=OpenOffice.Bridge_GetStruct('com.sun.star.beans.PropertyValue')"); scr.eval("MassivParametrov[0].Name='Hidden'"); scr.eval("MassivParametrov[0].Value=true"); Desktop = OpenOffice.createInstance("com.sun.star.frame.Desktop"); ФайлОбмена = Desktop.LoadComponentFromURL(URLИзИмениФайла(ИмяФайла), "_blank", 0, MassivParametrov); Для НомерЛиста = 0 По ФайлОбмена.sheets.count - 1 Цикл ТекущийЛист = ФайлОбмена.sheets.getByIndex(НомерЛиста); КоличествоСтрокНаЛисте = ТекущийЛист.rows.count - 1; Для НомерСтроки = 0 По КоличествоСтрокНаЛисте Цикл ДеньСобытия1 = ТекущийЛист.getCellByPosition(1, НомерСтроки).Value; КонецЦикла; КонецЦикла; ФайлОбмена.Close(Истина); | 
| Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |