| Vorheriges Thema anzeigen :: Nächstes Thema anzeigen |
| Autor |
Nachricht |
yoit
Anmeldungsdatum: 29.12.2008
Beiträge: 3
|
 Verfasst am: 31.03.2009, 13:28 Titel: Open CONS Problem |
 |
|
Tag.
Folgendes Szenario:
Ich habe eine Textdatei (yyy.txt) mir folgendem Inhalt:
und ein Freebasic-Programm (test.bas bzw. test.exe):
| Code: | Dim s As String
Dim all as String
Open CONS For Input As #1
Do Until Eof(1)
Line Input #1, s
all += s & Chr(13) & Chr(10)
Loop
Close #1
Print "|" & all & "|"
End |
Sofern ich in der Konsole test.exe < yyy.txt oder type yyy.txt | test.exe aufrufe, bekomme ich den Inhalt der Textdatei als Ausgabe.
Rufe ich aber nur test.exe auf, so bleibt das Programm bei dem Line Input "hängen".
Wie kann ich dieses Problem umschiffen bzw. vorher prüfen, ob etwas in mein Programm "reingepipe't" wird?
Bei dem Windowseigenen find.exe geht das ja auch... |
|
| Nach oben |
|
 |
Jojo
alter Rang
Anmeldungsdatum: 12.02.2005
Beiträge: 9736
Wohnort: Neben der Festplatte
|
| Verfasst am: 31.03.2009, 15:20 Titel: |
|
|
versuch mal WHILE statt DO:
| Code: | WHILE NOT EOF(1)
...
WEND |
WHILE ist in diesem fall immer besser als DO, da es nicht erwartet, dass überhaupt was im puffer steht (schleife wird nicht durchlaufen, wenn nix drin ist).
_________________
» Die Mathematik wurde geschaffen, um Probleme zu lösen, die es nicht gäbe, wenn die Mathematik nicht erschaffen worden wäre.
 |
|
| Nach oben |
|
|
yoit
Anmeldungsdatum: 29.12.2008
Beiträge: 3
|
| Verfasst am: 31.03.2009, 15:42 Titel: |
|
|
Leider das gleiche Problem  |
|
| Nach oben |
|
|
|
FAQ
Suchen
Mitgliederliste
Benutzergruppen
Registrieren
Profil
Einloggen, um private Nachrichten zu lesen
Login
