OpenOffice.cz - web věnovaný kancelářským balíkům OpenOffice.org

Zdravím, mám vytvořené makro, kterým si automaticky plním soubor .odt z jiných .txt souborů (01.txt,02.txt...). Chci se zeptat jestli jde cesta k souboru (file:///D:/Slozka/podslozka/01.txt) zapsat nějak relativně (../01.txt).

sub Main
dim document   as object
dim dispatcher as object
document   = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
dim args2(1) as new com.sun.star.beans.PropertyValue
args2(0).Name = "Name"
args2(0).Value = "file:///D:/Slozka/podslozka/01.txt"
args2(1).Name = "Filter"
args2(1).Value = "Text (encoded)"
dispatcher.executeDispatch(document, ".uno:InsertDoc", "", 0, args2())
end sub

Díky.

Potřeboval bych poradit s problémem. Popíšu to na příkladu.
Mám několik souborů protokolu z výpočetního programu u kterých budu dodržovat nějakou logiku pojmenování (např: 01.txt, 02.txt .... xy.txt). Všechny uložené v jednom adresáři a potřeboval bych je nějak automatizovaně vkládat do jednoho souboru writeru, ve kterém už budu mít nadefinovánu hlavičku, patičku případně další texty, které se nemusí měnit. Napadlo mě, že by to šlo nějak přes makra, ale nikdy jsem to nedělal, tak nevím.
Díky za každou radu, případně nasměrování jak to vyřešit.

_______________________________________________________

Značím jako vyřešené

;o)