Parametrage des Noms de Fichiers en Qbasic Fermé

Question

Bonjour Monsieur, 

Je souhaite faire le traitement du contenu des fichiers en Qbasic. 

Le nombre de fichiers à traiter est très élevé qui ne me permet pas de l'écrire dans la commande open un à un. Je compte mettre le nom des fichiers à traiter dans un fichier .DAT  ainsi le line input de ce fichier .DAT est un nom de fichier. 
Ensuite je présente  ce line input pour ouvrir dans une boucle qui permettra de dérouler l'ensemble du nom de fichier. Mais le problème est que à chaque fois une erreur File not Found  se produit sur ce line input 

Je sollicite une aide aux bonnes volontés je suis coincé, je suis un novice comme vous pouvez vous en rendre compte si possible je souhaite la réponse dans ma boîte car il n'est pas évident que je puisse retrouver la réponse sur ce site ou ailleurs

qbasic45 · Answer

BONJOUR
REM CODE CLAVIER DES FICHIERS EN QBASIC 4.5 
CLS :
10 REM
LOCATE 10, 10: PRINT "ok"
z$ = "": z$ = INKEY$
IF z$ = "" THEN 10
IF z$ = "f" THEN END
IF z$ = CHR$(0) + CHR$(72) THEN PRINT "HAUT"
IF z$ = CHR$(0) + CHR$(75) THEN PRINT "GAUCHE"
IF z$ = CHR$(0) + CHR$(80) THEN PRINT "BAS"
IF z$ = CHR$(0) + CHR$(77) THEN PRINT "DROITE"
GOTO 10

qbasic45 · Answer

boujour
cls 
open "c:\fichier.dat" for input as #1 
do 
line input #1,variable$ 
print variable$ 
loop until eof(1) = -1 
close #1 
end

Parametrage des Noms de Fichiers en Qbasic

2 réponses

Discussions similaires