OpenOffice.info

Sub ShowFiles
  Dim sNextFile As String
  Dim sAllFiles As String
  Dim sPath as String
 
  sPath = "/home/axel/Dokumente/*.ods"
 
  sAllFiles = ""
  sNextFile = Dir(sPath, 0)
 
  While sNextFile  <> ""
    sAllFiles = sAllFiles & Chr(13) &  sNextFile 
    sNextFile = Dir
  Wend
 
  MsgBox sAllFiles
End Sub

Hallo,

zumindest unter Linux funktioniert DIR, wie hier beschrieben: https://wiki.openoffice.org/wiki/Documentation/BASIC_Guide/Files_and_Directories_%28Runtime_Library%29

Beispiel:
[code]
Sub ShowFiles
Dim sNextFile As String
Dim sAllFiles As String
Dim sPath as String

sPath = "/home/axel/Dokumente/*.ods"

sAllFiles = ""
sNextFile = Dir(sPath, 0)

While sNextFile <> ""
sAllFiles = sAllFiles & Chr(13) & sNextFile
sNextFile = Dir
Wend

MsgBox sAllFiles
End Sub
[/code]

Einfach mal mit einem Mac-Pfad probieren.

viele Grüße

Axel

hallo

ich möchte mir die Dateinamen anzeigen lassen um eine Datei zu öffnen.
es gibt wohl unter basic eine art dir-funktion
funktioniert diese auch unter mac os x?
wie funktioniert die anzeige von dateinamen unter mac os x?

vielen dank
urbanKS