Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht Das deutsche QBasic- und FreeBASIC-Forum
Für euch erreichbar unter qb-forum.de, fb-forum.de und freebasic-forum.de!
 
FAQFAQ   SuchenSuchen   MitgliederlisteMitgliederliste   BenutzergruppenBenutzergruppen  RegistrierenRegistrieren
ProfilProfil   Einloggen, um private Nachrichten zu lesenEinloggen, um private Nachrichten zu lesen   LoginLogin
Zur Begleitseite des Forums / Chat / Impressum
Aktueller Forenpartner:

On Error goto ... Problem

 
Neues Thema eröffnen   Neue Antwort erstellen    Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht -> Allgemeine Fragen zu QBasic.
Vorheriges Thema anzeigen :: Nächstes Thema anzeigen  
Autor Nachricht
RaideR



Anmeldungsdatum: 15.09.2006
Beiträge: 21

BeitragVerfasst am: 26.09.2006, 13:56    Titel: On Error goto ... Problem Antworten mit Zitat

Also ich hab hier mal ein einfaches Beispiel geschrieben zu meinem Problem...
Der Computer versucht die Datei "XXX" auf der Diskette zu öffnen
Falls die Diskette nicht eingelegt ist, gibt es für den Benutzer eine Fehlermeldung.
Nun zu meinem Problem:
Wenn der Benutzer ein zweites mal keine Diskette eingelegt hat, kehrt das Programm wieder zu QB zurück und sagt mir "Diskette nicht bereit"
Was muss ich dafür tun das die Fehlermeldung "FEHLER" öfter als einmal kommt?


Code:

Anfang:
CLS
ON ERROR GOTO ENDE
OPEN "A:" + "XXX" + ".dat" FOR INPUT AS #1

Ende:
PRINT "FEHLER"
SLEEP
GOTO Anfang


Ich hoffe ich hab mich verständlich ausgedrückt zwinkern
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
Mao



Anmeldungsdatum: 25.09.2005
Beiträge: 4409
Wohnort: /dev/hda1

BeitragVerfasst am: 26.09.2006, 14:19    Titel: Antworten mit Zitat

Ich kann nur raten, da QB momentan net so richtig will:
Versuch statt
Code:

GoTo Anfang

mal
Code:

Resume Anfang

. Bei mir hat's so immer funktioniert. lächeln
_________________
Eine handvoll Glück reicht nie für zwei.
--
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
RaideR



Anmeldungsdatum: 15.09.2006
Beiträge: 21

BeitragVerfasst am: 26.09.2006, 21:45    Titel: Antworten mit Zitat

bösten dank lächeln
hast mir sehr geholfen
DANKE!!!
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
Beiträge der letzten Zeit anzeigen:   
Neues Thema eröffnen   Neue Antwort erstellen    Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht -> Allgemeine Fragen zu QBasic. Alle Zeiten sind GMT + 1 Stunde
Seite 1 von 1

 
Gehe zu:  
Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.

 Impressum :: Datenschutz