Das deutsche QBasic- und FreeBASIC-Forum

[steini]

Hallo!
Mein Prog hat mehrere Module mit jedweils vielen Subs und Functions.
Darin treten überall Dateizugriffe über eine Netzwerkverbindung auf.

Ich benötige nun einen Errorhandler, der nach einem möglichen Aussetzter der Netzwerkverbindung (Fehler 53 - Datei nicht gefunden) auf einen Tastendruck wartet und dann exakt an die gleiche Stelle wieder zurückspringt, damit der fehlgeschlagene Dateizugriff übers Netz
wiederholt werden kann.

ON ERROR GOTO fehlerroutine

[.... Programm...]

fehlerroutine:
IF ERR = 53 THEN
PRINT "Keine Verbindung!"
DO: LOOP WHILE INKEY$ = ""
RESUME
END IF


Das Problem ist zum einen, dass ich das Programm wegen zu wenig Speichers nicht mehr kompilieren kann, sobald ich das RESUME reinsetze, außerdem wird ja (wenn ich das in der Hilfe richtig verstanden habe) nicht unbedingt an genau der Zeile resumt, die den Fehler verursachte.
Wie kann ich nun also am geschicktesten einen fehlgeschlagenen Dateizugriff wiederholen lassen???

[Flo]

ich würds mit
resume zeilenmarkewoallesanfaengt
machen

und z.B.

[jb]

Eine andere Idee wäre sicher, zu überprüfen, ob in diesem Falle die Datei überhaupt existiert...

jb
_________________
Elektronik und Programmieren

[Mao]

Was bei einer Netzwerk-Verbindung aber auch nicht verbindlich ist. Die Verbindung kann ja abreißen, weshalb die im vorhergehenden Codeblock ausgeführte Überprüfung fast wertlos wäre, in diesem Fall.
_________________
Eine handvoll Glück reicht nie für zwei.
--

[steini]

@kleiner_hacker
Thx,
wenn ich nur eine Datei hätte wärs ja kein Probelem, ich habe aber bestimmt an die 200 Dateizugriffe in allen möglichen Modulen/subs/funktionen und würde es halt gerne mit EINER Fehlerbehandlung hinbekommen!

Also im Prinzip

EIN Fehlerahndler:
Wenn Fehler 53 dann warte auf Tastendruck und geh zur Fehlerzeile zurück und führe sie erneut aus