von Hugo53 » Fr, 30.12.2005 23:56
Hallo Thomas,
leider führen die beiden Werte für den "FilterName" nicht zum Erfolg.
sub ImportExcel2000Dat
Dim arg(0) as new com.sun.star.beans.PropertyValue
Dim sURL as String
Dim oDoc
arg(0).value = "Microsoft Excel 97/2000/XP"
arg(0).name = "FilterName"
sURL = "file:///d:/tmp/ExcelBeispiel.xls"
oDoc = StarDesktop.loadComponentFromURL(sURL, "_blank", 0, arg())
' -> ok
arg(0).name = "FilterName"
arg(0).value = "Lotus 1-2-3"
sURL = "file:///d:/tmp/WK1_Beispiel.WK1"
oDoc = StarDesktop.loadComponentFromURL(sURL, "_blank", 0, arg())
' -> nicht erfolgreich
arg(0).name = "FilterName"
arg(0).value = "Lotus"
sURL = "file:///d:/tmp/WK1_Beispiel.WK1"
oDoc = StarDesktop.loadComponentFromURL(sURL, "_blank", 0, arg())
' -> nicht erfolgreich
end sub
Gruss Horst
Hallo Thomas,
leider führen die beiden Werte für den "FilterName" nicht zum Erfolg.
sub ImportExcel2000Dat
Dim arg(0) as new com.sun.star.beans.PropertyValue
Dim sURL as String
Dim oDoc
arg(0).value = "Microsoft Excel 97/2000/XP"
arg(0).name = "FilterName"
sURL = "file:///d:/tmp/ExcelBeispiel.xls"
oDoc = StarDesktop.loadComponentFromURL(sURL, "_blank", 0, arg())
' -> ok
arg(0).name = "FilterName"
arg(0).value = "Lotus 1-2-3"
sURL = "file:///d:/tmp/WK1_Beispiel.WK1"
oDoc = StarDesktop.loadComponentFromURL(sURL, "_blank", 0, arg())
' -> nicht erfolgreich
arg(0).name = "FilterName"
arg(0).value = "Lotus"
sURL = "file:///d:/tmp/WK1_Beispiel.WK1"
oDoc = StarDesktop.loadComponentFromURL(sURL, "_blank", 0, arg())
' -> nicht erfolgreich
end sub
Gruss Horst