Как открыть шаблон в OpenOffice?

[PT]

Хочу создать документ на основе шаблона в OpenOffice
Перечитала кучу форумов, пересмотрела примеры, но все равно никак не получается создать новый документ на основе шаблона, открывается сам шаблон для редактирования..
Подскажите..

static void oo_4(Args _args)
{
    COM OpenOffice;
    COM scr;
    COM DeskTop;
    COM Document;
    COMVariant ;
    str filepath;
    COM propertyValue;
    array arr;
    ;
    arr = new Array(types::Class);

    //Создание экземпляра OpenOffice.org
    OpenOffice = new Com("com.sun.star.ServiceManager");
    DeskTop = OpenOffice.CreateInstance("com.sun.star.frame.Desktop");

    propertyValue = OpenOffice.Bridge_GetStruct('com.sun.star.beans.PropertyValue');
    propertyValue.Name('AsTemplate');
    propertyValue.Value(true);

    arr.value(1,propertyValue);

     = comVariant::createFromArray(arr);
    info(.toString());

     filepath = "file://///Axapta-aos/Шаблоны/Претензии.xlt";
    //Открытие документа
     Document = DeskTop.LoadComponentFromURL(filepath, "_blank", 0, );
}

[Eldar9x]

попробуйте Types::String вместо types::Class
и без использования дополнительных опций

[Gustav]

Ничего не знаю про OpenOffice, но насколько могу понять из кода, речь неявно идёт и о файле Excel. Так вот, чтобы создать новый файл xls на основе шаблона нужно вначале специальным образом этот шаблон подготовить в Excel и сохранить как файл c расширением xlt (eXceL Template). После этого обычное открытие файла, например, Претензии.xlt будет приводить к автоматическому созданию нового файла Претензии1.xls.

[PT]

Ой да, действительно, в примере написала xls, вместо xlt, уже исправила. В любой случае это просто опечатка, открывается сам шаблон полюбому..

тип массива string нельзя указать - будет несовместимость типов..
здесь есть рабочий пример http://community.i-rs.ru/index.php/topic,3277.0.html, но у меня не получается корректно переделать его для аксапты

[Eldar9x]

ну по крайней мере это же не тип class, надо бы перебрать наиболее вероятные, enum, int... лучше бы все, конечно. И еще передача строк, лучше бы везде исправить на двойные кавычки, хотя, это уже шаманство

[Lucky13]

Попробуйте так, т.е. передавайте не Array, а COMVariant:

    ComVariant          varArr;
    Array               arr;
    ;
    arr       = new Array(Types::String);
    varArr    = ComVariant::createFromArray(arr);

    OO        = new Com('com.sun.star.ServiceManager');
    OD        = OO.CreateInstance('com.sun.star.frame.Desktop');
    Doc       = OD.LoadComponentFromURL(TemplateName, '_blank', 0,  varArr);

Необъявленные переменные имеют тип COM

[Eldar9x]

все таки COMVariant:
http://www.axforum.info/forums/printthread.php?t=16898

[PT]

этот код просто открывает файл , а мне надо именно в вариантный массив (varArr ) передать параметры, что бы файл открылся на основе шаблона..

[Eldar9x]

обратите внимание:
http://www.delphimaster.ru/articles/openoffice/
цитата

Цитата:

{Метод CreateDocument создает новый текстовый документ. Как видите Сервис
Менеджер, который доступен через переменную StarOffice, создает и возвращет
экземпляр DeskTop. Рассмотрим пристальнее метод LoadComponentFromURL. Первым
параметром передается имя файла, в виде URL. На самом деле строка
'private:factory/swriter' действительно указывает на существующий файл. Это файл
шаблона, по которому создается пустой текстовый документ.
Следующий параметр ('_blank') указывает на то, что
документ должен открыться в новом окне.
Третьим параметром идут флаги вызова, пока что всегда
равны нулю. И последним параметром, идут опции открытия документов. На самом деле,
это массив пар название опции - значение опции. В данном случае, дополнительных
опций мы не используем, поэтому передаем пустой массив. Передачу опций более
детально рассмотрим ниже. }

то есть как будто получается, что параметров не надо передавать, хотя в этом случае не calc рассматривается, но м/б и здесь так...

[PT]

если не передавать параметры, то файл просто откроется по умолчанию...
вот параметры:

loadComponentFromURL Method Options

The fourth parameter of the loadComponentFromURL function is a PropertyValue data field. which provides StarOffice with various options for opening and creating documents. The data field must provide a PropertyValue structure for each option in which the name of the option is saved as a string as well as the associated value.

PHP код:

loadComponentFromURL supports the following options:
    *      AsTemplate (Boolean) – if true, loads a new, untitled document from the given URL. If is false, template files are loaded for editing.
    *      CharacterSet (String) – defines which set of characters a document is based on.
    *      FilterName (String) – specifies a special filter for the loadComponentFromURL function. The filter names available are defined in the \share\config\registry\instance\org\openoffice\office\TypeDetection.xml file.
    *      FilterOptions (String) – defines additional options for filters.
    *      JumpMark (String) – once a document has been opened, jumps to the position defined in JumpMark.
    *      Password (String) – transfers a password for a protected file.
    *      ReadOnly (Boolean) – loads a read-only document. 


http://docs.sun.com/app/docs/doc/819...02?l=ru&a=view

и мне их надо передать через Массив последним параметром, вот только как???

[kBace4ka]

Столкнулся с такой же проблемой.
Заполняем
propertyValue = OpenOffice.Bridge_GetStruct("com.sun.star.beans.PropertyValue");
propertyValue.Name('AsTemplate');
propertyValue.Value(true);

а как теперь передать ?
Doc = OD.LoadComponentFromURL(TemplateName, '_blank', 0, varArr);

[c_makarov]

Это делается так:

static void oo_4(Args _args)
{

    COM OpenOffice;
    COM DeskTop;
    COM Document;
    COM MyStruct;
    str filepath;

    // аргумент для вызова методов через диспатч
    COMVariant varArg1 = new COMVariant();
    // аргумент для массива свойств
    COMVariant var = new COMVariant();

    // Это для того, чтобы вызывать диспатчевые методы
    // а конкретно - аксапта часто не умеет ставить значения пропертям
    // и приходится вот так.
    ComDispFunction Func;

    // аргумент для всяких методов
    COMVariant arg;

    // иногда нужен массив свойств
    Array arr = new Array(Types::Class);

    // Создание экземпляра OpenOffice.org
    OpenOffice = new Com("com.sun.star.ServiceManager");
    DeskTop = OpenOffice.CreateInstance("com.sun.star.frame.Desktop");


    // получаем объект, в котором хранится свойство (для передачи в функцию)
    MyStruct = OpenOffice.Bridge_GetStruct("com.sun.star.beans.PropertyValue");

    Func = new COMDispFunction(MyStruct, "Name",  COMDispContext::PropertyPut);
    varArg1.bStr("AsTemplate");
    Func.call(varArg1);

    Func = new COMDispFunction(MyStruct, "Value",  COMDispContext::PropertyPut);
    varArg1.boolean(true);
    Func.call(varArg1);

    var = COMVariant::createFromCOM(MyStruct);
    arr.value(1,var);
    
    // Создание документа

    // create and initialize a COMVariant object
    arg = COMVariant::createFromArray(arr);

       
    filepath = "file://///Axapta-aos/Шаблоны/Претензии.xlt";

    Document = DeskTop.LoadComponentFromURL(filepath, "_blank", 0, arg);


}

[raniel]

Тема старая но всё же тут попробую задать уточняющий вопрос.
В каком формате нужно указывать путь до файла?

Цитата:

filepath = "file://///Axapta-aos/Шаблоны/Претензии.xlt";

пытаюсь посредством этой строки открыть фаилик который лежит в папочке на диске с
Но у меня ругается не открывает. Как праильно написать путь к файлу C:\TEMP\Exampl.xlt ?

[samolalex]

Попробуйте "удвоить" слэши. И сделать так:

filepath = "file:////Axapta-aos//Шаблоны//Претензии.xlt";

[lev]

ещё можно попробывать так:

filepath = @"C:\TEMP\Exampl.xlt";

[raniel]

Цитата:

Сообщение от samolalex

Попробуйте "удвоить" слэши. И сделать так:

filepath = "file:////Axapta-aos//Шаблоны//Претензии.xlt";

Несовсем понял как указать диск C: и папочку TEMP? file:////Axapta-aos// это где?

[lev]

Цитата:

Сообщение от raniel

Несовсем понял как указать диск C: и папочку TEMP? file:////Axapta-aos// это где?

так указывается сетевой путь к компьютеру
в частности Axapta-aos - это сервер у топик стартера.

[samolalex]

Цитата:

Сообщение от raniel

Несовсем понял как указать диск C: и папочку TEMP? file:////Axapta-aos// это где?

Извините, взял не тот пример.
Вот так:

filepath = "C:\\TEMP\\Exampl.xlt"

или как указал lev

[raniel]

ну про file://// я догадывался, просто уточнил.

Цитата:

filepath = "C://Temp//Exampl.xlt";
Document = DeskTop.LoadComponentFromURL(filepath, '_blank', 0, arg);

пробовал не помогает
и так

Цитата:

filepath = "C:\\Temp\\Exampl.xlt";
Document = DeskTop.LoadComponentFromURL(filepath, '_blank', 0, arg);

пробовал не помогает
и так тоже не идёт

Цитата:

filepath = @"C:\TEMP\Exampl.xlt";
Document = DeskTop.LoadComponentFromURL(filepath, '_blank', 0, arg);

Выдаёт вот такую ошибку:

Цитата:

Метод "LoadComponentFromURL" в COM-объекте класса "<неизвестно>" возвратил код ошибки 0x80020009 (DISP_E_EXCEPTION), который означает: com.sun.star.lang.IllegalArgumentException: URL seems to be an unsupported one.

[samolalex]

используйте именно обратные слэши в данном случае:

filepath = "C:\\TEMP\\Exampl.xlt"

а не

filepath = "C://Temp//Exampl.xlt";