[Oo-discuss] Пакетный экспорт

[Rail Aliev]

----- "Maksim Otstavnov" <maksim на otstavnov.com> wrote:
> Hello Anton,
> 
> Friday, March 30, 2007, 12:12:05 PM, you wrote:
> 
> AF> Максим, говорят что это можно сделать с помощью OOo. Как - не
> знаю. Знаю
> AF> что у нас в одном из проектов люди это смогли.
> 
> И не рассказывают, как?


Возможно будет обрыв треда - пишу через веб интерфейс. :(

Могу подать идею как это сделать

1. В OOo добавляется следующий макрос:

Sub convertToPDF(strFile as string, strDestFile as string)
    Dim oDoc as Object
    Dim strFilterSubName as String

    strUrl = ConvertToUrl( strFile )
    oDoc = StarDesktop.loadComponentFromURL( strUrl, "_blank", 0, array(MakePropertyValue("Hidden",true)))

    cURL = ConvertToURL( strDestFile )

    oDoc.storeToURL( cURL, Array( MakePropertyValue( "FilterName", "writer_pdf_Export" ) )

    oDoc.close(True)
End Sub

OpenOffice.org запускается так:

openoffice.org-2.2 -writer 'macro:///standard.Module1.convertToPDF("file.odt", "file.pdf")'


-- 
Best regards,
Rail Aliev
www.i-rs.ru