FExists() auf Verzeichnis [erledigt]

[Werner_Bayern]

Servus,

warum bekomme ich hier immer ein .f. zurück, wenn der gültige Pfad x mit

\\192.168.202.14\WW\

belegt ist?

Code: Alles auswählen

FExists(if(right(x, 1) == "\", left(x, len(x) - 1), x), "=D*")

Pfad liegt auf einem NAS, die Freigabe ist da, kann im Explorer einwandfrei aufgelöst werden, der Zugriff über dbusearea(x + "meine.dbf") funktioniert auch.

[Martin Altmann]

Moin Werner,
nimm die Funktion Directory, dann geht es (vorausgesetzt, es ist nicht leer!):

Code: Alles auswählen

len( Directory( x + "*" ) ) > 0

Viele Grüße,
Martin

[Werner_Bayern]

Moin Martin,

danke. Weißt Du warum das so ist? Die Directory-Funktion dauert halt wohl wesentlich länger, weil es alle Dateien mit allen Informationen einliest. Gerade im Netz kann sowas dann schon mal einige Sekunden dauern, wenn da viele Dateien in dem Verzeichnis sind.

Hab mir gestern noch mit FExists(x+"meine.dbf") geholfen, weil ich in diesem Fall sicher weiß, dass die Datei auch in dem Verzeichnis sein muss. Geht es nur um die Prüfung auf ein gültiges Verzeichnis, hab ich noch keine Lösung.

[Martin Altmann]

Nö - aber ich prüfe auch mit file().
Aber geht bei UNC-Pfaden auch nicht - nur mit einer Datei (oder einem Unterverzeichnis) dazu.

Viele Grüße,
Martin

[georg]

Hallo,


dann sollte es auch mit "Directory(x + ".") gehen ... Das sollte nur einen Eintrag zurückliefern und deutlich schneller sein.

[Martin Altmann]

Nö - tut es leider nicht!
Aber die Idee an sich ist nicht verkehrt, denn so geht es:

Code: Alles auswählen

if len( directory( x + ".\" ,"D" ) ) > 0

Viele Grüße,
Martin

[Wolfgang Ciriack]

Wenn du nur auf die Existenz prüfen willst, kannst du das mit einem Wechsel in das Verzeichis tun und dann den Rückgabewert abfragen (ToolsIII funktion).

[brandelh]

Hi,
Deine Bezeichnung für den UNC-Pfad ist nicht vollständig !

Code: Alles auswählen

\\server\freigabe   => Laufwerk:
\\server\freigabe\* => Laufwerk:\

Hier mein Testcode und die Ergebnisse in der letzten Zeile, die "D*" sind hier auch etwas seltsam in der Wirkung, "D" reicht

Code: Alles auswählen

#include "Xbp.ch"
#include "Common.ch"

procedure main()
   ? "file('\\NAS\bilder'   )",file("\\NAS\bilder")   // .f.
   ? "file('\\NAS\bilder\'  )",file("\\NAS\bilder\")  // .f.
   ? "file('\\NAS\bilder\*' )",file("\\NAS\bilder\*") // .t.
   ? "fExists('\\NAS\bilder'  ,'D')" ,fExists('\\NAS\bilder'  ,'D')  // .f.
   ? "fExists('\\NAS\bilder\' ,'D')" ,fExists('\\NAS\bilder\' ,'D')  // .f.
   ? "fExists('\\NAS\bilder\*','D*')",fExists('\\NAS\bilder\*','D*') // .f.
   ? "fExists('\\NAS\bilder\*','D')" ,fExists('\\NAS\bilder\*','D')  // .t.
   inkey(10)
return

[Werner_Bayern]

Servus Hubert,

Du hast Recht, mit "\*" gehts. Komische schreibweise.

Also weder mit "\\192.168.202.14\WW\" noch mit "\\192.168.202.14\WW" gehts, sondern nur mit "\\192.168.202.14\WW\*".

Das "D*" kann nicht funktionierten, Du musst da "=D*" verwenden, dann klappts.