???Wahrum läuft diesr Blitz Basic Code nicht???
Print "Formate 1.0"
Print "Taste drücken"
WaitKey
Gosub sprung
.sprung
Eingabe$ = Input("Zu Löschende Datei:")
If FileType ("Eingabe$") = 0 Then Print "Datei nicht gefunden." Return
DeleteFile "Eingabe$"
If FileType("Eingabe$") = 0 Then Print "Löschen war erfolgreich."
If FileType("Eingabe$") = 1 Then Print "Löschen ist velgeschlagen"
Print "Taste drücken"
WaitKey
End
Help Gast |