Hallo,
wie kann ich in vb herausfinden, ob es sich bei einem angegebenen Pfad um einen Ordner oder um eine Datei handelt ??
Habe es mit GetAttr versucht. Die Funktion gibt zwar Attribute wie komprimiert, schreibschutz, usw. zurück, aber das nützt nix, da ja sowohl Ordner als auch Dateien diese Werte annehmen können.
Eine Möglichkeit ist, einfach zu versuchen mit open die eventuelle Datei zu öffnen. Wenn es sich um einen Ordner handelt, schlägt das öffnen fehl und ich bekomme einen Fehler, den ich dann ja abfangen kann. Allerdings ist diese Methode sehr langsam, da eben alle Dateien kurz geöffnet werden.
Hat jemand eine bessere Idee ?
Bin für jeden Hinweis dankbar !!
Gruß Matthias
Function ReportFileStatus(ByVal strFile As String) As Boolean
Dim objFSO As Object
Set objFSO = CreateObject(„Scripting.FileSystemObject“)
ReportFileStatus = objFSO.FileExists(strFile)
End Function
Übergabe: strFile (bsp: „C:\Windows\test“)
True = strFile ist eine Datei
False = strFile ist ein Verzeichnis
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]
Hallo zusammen,
bei FALSE heisst das aber nicht zwangslaeufig, dass das ein Ordner ist, sondern einfach nur das keine Datei mit dem angegebenen Pfad existiert, es gibt auch eine Funktion FolderExists im FSO, man sollte prüfen ob da wirklich ein Verzeichnis liegt…oder nicht?
Oliver
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]
Danke !
Hallo,
Ja, so etwas wie die FolderExists-Methode habe ich gesucht.
Danke !!
Gruß
Matthias
Dann versuchs mal über das Objekt „DirListBox“. (dir1.Path)
Einfacher wäre es aber doch wirklich mit der Getattr Funktion. Z. B. : GetAttr(„C:\Windows“) = vbDirectory
RP
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]