Ich möchte nicht alle FileExist Checks hintereinander machen. Wie geht das mit einer einzigen Abfrage oder untereinander?
If ... And mehrmals untereinander
-
- [ gelöst ]
-
mchope57 -
17. Oktober 2012 um 16:26 -
Geschlossen -
Erledigt
-
-
So?
[autoit]If FileExists(@ScriptDir & "/patchskin/main.bmp") _
[/autoit]
And FileExists(@ScriptDir & "/patchskin/btn_startgame_up.bmp") _
And FileExists(@ScriptDir & "/patchskin/btn_startgame_fs.bmp") Then
MsgBox(0, "", "gut")
Else
MsgBox(48, "Fehler", "Fehler: Ein oder mehrere Patchskin/s wurde/n nicht gefunden.")
Exit
EndIf -
Um die einzelnen Anfrage wirst du wohl nicht rumkommen untereinander schreiben kannst du es wie folgt:
Spoiler anzeigen
[autoit]If FileExists (@ScriptDir & "/patchskin/main.bmp") _
[/autoit]
And FileExists (@ScriptDir & "/patchskin/btn_startgame_up.bmp") _
And FileExists (@ScriptDir & "/patchskin/btn_startgame_fs.bmp") Then
MsgBox (0,"","gut")
Else
MsgBox (48,"Fehler","Fehler: Ein oder mehrere Patchskin/s wurde/n nicht gefunden.")
Exit
EndIf
Und ich empfehle dir die [ autoit ] bzw. [ /autoit ] tags zu verwenden (ohne Leerzeichen). Es ist viel übersichtlicher, wenn man den Code gleich im Post sieht.Gruss Shadowigor
EDIT: Och mann, da war ich wohl wieder einmal zu langsam
-
Danke euch..
@Shadowiger Das hab ich versucht, aber funktioniert leider irgendwie nicht -
So wird jede Datei einzeln im Fehlerfall ausgegeben. Der Nutzer bekommt auch eine Info, wo die Datei fehlt (Pfadangabe) . Weiterhin sind die Bilder schon deklariert und können im weiteren Verlauf angesprochen werden !
[autoit]
[/autoit]
;i Die Existenz der notwendigen Basisdateien abfragen
Dim $data = @ScriptDir & "/patchskin/"
Dim $array[3] = ["main.bmp", "btn_startgame_up.bmp", "btn_startgame_fs.bmp"]
For $i = 0 To 2 ;i statisch kein Ubound
If Not FileExists($data & $array[$i]) Then Exit _
MsgBox(262144 + 16, 'Error ', $data & $array[$i] & @CRLF & @CRLF & "File Not Found ! ")
Next
; Ende -
So wird jede Datei einzeln im Fehlerfall ausgegeben. Der Nutzer bekommt auch eine Info, wo die Datei fehlt (Pfadangabe) . Weiterhin sind die Bilder schon deklariert und können im weiteren Verlauf angesprochen werden !
[autoit]
[/autoit]
;i Die Existenz der notwendigen Basisdateien abfragen
Dim $data = @ScriptDir & "/patchskin/"
Dim $array[3] = ["main.bmp", "btn_startgame_up.bmp", "btn_startgame_fs.bmp"]
For $i = 0 To 2 ;i statisch kein Ubound
If Not FileExists($data & $array[$i]) Then Exit _
MsgBox(262144 + 16, 'Error ', $data & $array[$i] & @CRLF & @CRLF & "File Not Found ! ")
Next
; EndeSuper noch besser.. Danke!
-
Kein Problem, immer wieder gern.