OpenOffice.info

Ich bin es selbst nochmal:

Ich benutze Windows7 und wenn ich im Explorer ein Calc-File doppelt klicke, damit es von OO aufgemacht wird, kriege ich ständig "Runtime-Fehler"...???

Kann das die Ursache für das Nichfunktionieren meiner Programmierung sein?

Dim oDesk, oDoc AS Object
Dim ladeZustand(0)
        oDesk = oSM.createInstance("com.sun.star.frame.Desktop") 'Erstelle den ersten & wichtigsten Dienst
        ladeZustand(0) = oSM.Bridge_GetStruct("com.sun.star.beans.PropertyValue")
        ladeZustand(0).Value = True

        'Lade ein Calc-Tabellendokument
        Dim str As String = pfad + fName + ".ods"   'pfad ist Dateipfad, fName ist Dateiname
        str = str.Replace("\", "/")
        str = "file:///" + str.Replace(":", "|")
        oDoc = oDesk.loadComponentFromURL(str, "_blank", 0, ladeZustand)

Hallo,
ich habe in VB.net programmiert und um zu erreichen, dass ein Calc-File in OO geladen wird:
[code]Dim oDesk, oDoc AS Object
Dim ladeZustand(0)
oDesk = oSM.createInstance("com.sun.star.frame.Desktop") 'Erstelle den ersten & wichtigsten Dienst
ladeZustand(0) = oSM.Bridge_GetStruct("com.sun.star.beans.PropertyValue")
ladeZustand(0).Value = True

'Lade ein Calc-Tabellendokument
Dim str As String = pfad + fName + ".ods" 'pfad ist Dateipfad, fName ist Dateiname
str = str.Replace("\", "/")
str = "file:///" + str.Replace(":", "|")
oDoc = oDesk.loadComponentFromURL(str, "_blank", 0, ladeZustand)
[/code]Das hat unter OO 2.x auch bestens funktioniert.
Seit ich OO 3.1 installiert habe, geht es nicht mehr. oDoc ist Nothing, die Datei wird nicht mit oo-Calc geöffnet.
Woran kann das liegen? Was muss ich ändern?

Grüße-
Dietrich