To comment on the following update, log in, then open the issue:
http://www.openoffice.org/issues/show_bug.cgi?id=68579
------- Additional comments from [EMAIL PROTECTED] Tue Sep 5 06:33:45 -0700
2006 -------
Sub Main
Dim oDoc as Object
Dim oIndexes as Object
Dim oIndex as Object
Dim aHidden(1) as new com.sun.star.beans.PropertyValue
aHidden(0).Name = "Hidden"
aHidden(0).Value = true
Dim aFilter(1) as new com.sun.star.beans.PropertyValue
aFilter(0).Name = "FilterName"
aFilter(0).Value = "writer_pdf_Export"
cFile = "x:\tl\AcknowledgeServicePlan.odt"
cURL = ConvertToURL( cFile )
oDoc = StarDesktop.loadComponentFromURL( cURL, "_blank", 0, aHidden, )
cFile = Left( cFile, Len( cFile ) - 4 ) + ".doc"
cURL = ConvertToURL( cFile )
' Update the Indexes (does not work correctly on 100+ page documents)
oIndexes = oDoc.getDocumentIndexes()
for i = 0 to oIndexes.Count -1
oIndexes(i).update
next i
' Save the document using a PDF filter.
cFile = Left( cFile, Len( cFile ) - 4 ) + ".pdf"
cURL = ConvertToURL( cFile )
oDoc.storeToURL( cURL, aFilter, )
oDoc.close( True )
End Sub
---------------------------------------------------------------------
Please do not reply to this automatically generated notification from
Issue Tracker. Please log onto the website and enter your comments.
http://qa.openoffice.org/issue_handling/project_issues.html#notification
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
