PureBoard

Verfasst: **30.03.2005 17:22**

ich suche eine Abfrage die ausgibt, ob die angegebene Datei existiert.
etwa: if FileExist(Pfad$)
hoffe jemand weiß was
danke

Verfasst: **30.03.2005 17:26**

> ich suche eine Abfrage die ausgibt, ob die angegebene Datei existiert.

FileSize(sFile.s) ist Dein Freund.

Grüße ... Kiffi

Verfasst: **30.03.2005 17:37**

Genauer:

Code: Alles auswählen

Procedure FileExist(file.s)
    If FileSize(file) => 0 ;Es gibt auch 0 Byte Dateien :)
        ProcedureReturn #True
    Else
        ProcedureReturn #False 
    EndIf
EndProcedure

Debug FileExist("ABC:\efgha-_-.kkk[~_~]")
Debug FileExist("C:\Dokumente und Einstellungen\Leo\Desktop\winner.bmp")

Verfasst: **30.03.2005 17:42**

Es gibt aber auch -3 Byte grosse Dateien!
Teste auf FileSize() = -1, wenn ja, dann File nicht da.

Verfasst: **30.03.2005 17:44**

Noch besser:

IsFile()

Syntax

Ergebnis = IsFile(#File)
Beschreibung

Überprüft, ob die angegebene #File Nummer gültig und eine korrekt initialisierte Datei ist. Diese Funktion ist "kugelsicher" und kann mit jedem Wert benutzt werden. Ist das 'Ergebnis' ungleich null, dann ist das Objekt gültig und initialisiert, andernfalls wird null zurückgegeben. Dies ist der richtige Weg, um sicher zu stellen, dass eine Datei bereit zur Verwendung ist.
Unterstützte OS

Windows, Linux

mfG
Basti

[Edit]Ups, ich merke jetzt erst, dass das File für diese Funktion schon geladen sein muss. Bitte den Beitrag löschen.[/Edit]

Verfasst: **30.03.2005 17:46**

Dann musst du sie aber zuerst versuchen zu öffnen mit ReadFile() also umständlicher.

Verfasst: **30.03.2005 17:53**

Code: Alles auswählen

Pfad$=OpenFileRequester("Datei wählen....","C:\","*.*",0)  
       Exist = FileSize(Pfad$)
        If Exist = 1
        MessageRequester("Fehler", "Datei existiert nicht!", 0)
        Else 
          MessageRequester("existiert", "Datei existiert!", 0)
        EndIf

kann mir jemand sagen warum das nicht klappt?????

PB hilfe:

Syntax

Ergebnis = FileSize(DateiName$)
Beschreibung

Gibt die Größe der angegebenen Datei zurück.

Besondere 'Ergebnis' Werte:

-1: Datei wurde nicht gefunden.
-2: Datei ist ein Verzeichnis.

Verfasst: **30.03.2005 17:56**

ahh habs schon, anstatt -1 hab ich 1 benutzt
naja klappt super, trotzdem danke für eure mühe!!!

Verfasst: **30.03.2005 17:56**

Weil du dich vertippt hast.
Linie 3

edit: lol

PureBoard

exsistiert die Datei ???

exsistiert die Datei ???

Re: exsistiert die Datei ???