OpenOffice.info

Sub Datei_laden
fName = FileOpenDialog ("bitte die entsprechende Datei wählen")
print "ausgewählte Dtei: "+fName
End Sub

function FileOpenDialog(title as String) as String
filepicker = createUnoService("com.sun.star.ui.dialogs.FilePicker")
filepicker.Title = title
filepicker.execute()
files = filepicker.getFiles()
FileOpenDialog=files(0)
End function

Ich weiß nicht, ob Du noch an einer Lösung interessiert bist, aber ich habe noch folgendes gefunden:

[code]
Sub Datei_laden
fName = FileOpenDialog ("bitte die entsprechende Datei wählen")
print "ausgewählte Dtei: "+fName
End Sub

function FileOpenDialog(title as String) as String
filepicker = createUnoService("com.sun.star.ui.dialogs.FilePicker")
filepicker.Title = title
filepicker.execute()
files = filepicker.getFiles()
FileOpenDialog=files(0)
End function
[/code]

In fName steht dann der Pfad + Dateiname.

Gruß
Werner

[quote]was mache ich da falsch?[/quote]
a) Du verwendest nicht den Standard-[i]filepicker[/i] zur Dateiauswahl (damit umgehst Du Fehleingaben)
b) Du hast ein [i]control[/i]-Objekt in der Variablen [color=#008000]datei[/color], nicht den Wert der Eingabe im Kontrollobjekt, welches Du ausgeben möchtest.

Besorge Dir [url=http://ooomacros.org/dev.php#101416]XRay[/url] zum Untersuchen Deiner Objekte.