Seite 1 von 1

Zugriff auf Dateien unter WinNt

Verfasst: Mi, 03.05.2006 13:07
von mike6
Hallo,

mit dem nachfolgenden Makro erhalte ich den Zugriff auf
die Laufwerke:

###########################################
Sub Laufwerkszugriff
MyDialog=createunoservice("com.sun.star.ui.dialogs.FolderPicker")
myDialog.displaydirectory="c:\"
myDialog.execute
myDialog.setMultiSelectionMode(true)
msgbox mydialog.directory
End sub
###########################################

Ich möchte nun erreichen, dass ich auch auf die Dateien(*.txt) in den
einzelnen Verzeichnissen zugreifen kann.

Wie muss ich den Code ergänzen?

PS: Habe in Google nichts gefunden.


mfg
mike6

Verfasst: Mi, 03.05.2006 16:12
von ykcim
Dazu mußt Du Filepicker verwenden.

Code: Alles auswählen

Sub TestDialog
MyDialog=createunoservice("com.sun.star.ui.dialogs.FilePicker")
myDialog.displaydirectory="c:\"
MyDialog.execute
FileName=MyDialog.Files(0)
End sub
mfg
Michael

Verfasst: Mi, 03.05.2006 16:51
von mike6
Hallo Michael,

Danke!

mfg
mike6