gary: .odt --> .doc konvertieren

Beitrag lesen

Hallo Vinzenz,

Das ist der relevante teil des Makros:

rem ----------------------------------------------------------------------
dim args2(2) as new com.sun.star.beans.PropertyValue
args2(0).Name = "URL"
args2(0).Value = "file:///C:/Dokumente%20und%20Einstellungen/Besitzer/Desktop/Convert/ABS_Bew_ALDI.doc"
args2(1).Name = "FilterName"
args2(1).Value = "MS Word 97"
args2(2).Name = "SelectionOnly"
args2(2).Value = true

dispatcher.executeDispatch(document, ".uno:SaveAs", "", 0, args2())

Kann man das so wie früher machen:

rem ----------------------------------------------------------------------

rem --- Schleifenanfang ---
for x=1 to 90

dim args2(2) as new com.sun.star.beans.PropertyValue
args2(0).Name = "URL"
args2(0).Value =

rem --- hier beliebige datei durch stern auswählen ---
"file:///C:/Dokumente%20und%20Einstellungen/Besitzer/Desktop/Convert/*.odt"

args2(1).Name = "FilterName"
args2(1).Value = "MS Word 97"
args2(2).Name = "SelectionOnly"
args2(2).Value = true

dispatcher.executeDispatch(document, ".uno:SaveAs", "", 0, args2())

rem --- Schleifenende ---
next x

Wie sehen die Chancen aus, dass das funktioniert?

Grüsse gary