OpenOffice openen met visual basic

Status
Niet open voor verdere reacties.

RomanT

Nieuwe gebruiker
Lid geworden
31 dec 2006
Berichten
1
Wie kan mij helpen.
Het openen van een bestand is geen probleem.

' voor openoffice 2.1
Global OpOff As Object ' Basis object
Global OODesk As Object ' Voor de API desktop
Global OODoc As Object ' Voor de API document
Global Arg() ' Voor de argumenten

' onderstaande zijn de instellingen voor open office
Set OpOff = CreateObject("com.sun.star.ServiceManager")
Set OODesk = OpOff.createInstance("com.sun.star.frame.Desktop")

' dit is de sub
A$ = Disk$ + "Temp\test.odt"
Set OODoc = OODesk.loadComponentFromURL("file:///" + A$, "_blank", 0, Arg())

Maar bij het afsluiten van het document in krijg ik de volgende foutmelding
OpenOffice.org 2.1
Fout bij het opslaan van document .........
Algemene fout
Algemene invoer-/uitvoerfout

Ik heb al van alles getest o.a. met het makepropertyvalue "ReadOnly", false
dit werkt wel als ik het bestand via VB6 wil wegschrijven. Maar dat is niet de bedoeling.
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan