Prüfen, ob Datei vorhanden ist !

[JKG]

Hallo Zusammen !

Ich fasse es nicht. Ich bin irgendwie zu dumm, um heraus zu finden, wie man überprüft, ob eine Datei bereits vorhanden ist. Ich lasse den Benutzer über einen SaveFileRequester eine Datei eingeben. Ich möchte dann checken, ob es die Datei gibt, und eine Frage einblenden, ob überschrieben werden soll oder nicht.
Ich sollte doch anfangen, öfters in PureBasic zu arbeiten, damit ich diese Basics immer direkt parat hat.


Gruß Jörg

[jpd]

Hallo Joerg,

aus der hilfe ....

FileSize()

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.

Unterstützte OS

All


Grüsse
jpd

[ts-soft]

Code: Alles auswählen

File.s = SaveFileRequester("", "", "", 0)
If FileSize(File) >= 0
  Select MessageRequester("", "übermalen?", #PB_MessageRequester_YesNo)
    Case #PB_MessageRequester_Yes
      ; speichern
   EndSelect
EndIf

[#NULL]

>>"übermalen?"

[JKG]

Viiiiiieeeeeelen Dank !

Unter FileSize hab ich natürlich nicht geschaut.
Habe nicht geahnt, dass dieser Befehl solch eine wichtige Nebenwirkung hat.

Also nochmals Danke - toll von Euch !


Gruß Jörg