OVH Cloud OVH Cloud

QB45 ouvrir fichier pour écrire et lire

7 réponses
Avatar
hotrock
Bonjour !

Je ne trouve pas de site pour qbasic45 français alors il y a peut être
quelqu,un qui pourrait m'aider ici ?

J'ai une routine qui fonctionne en écriture mais pas en lecture la voici:

CLOSE
OPEN "C:\taxe.txt" FOR OUTPOUT AS #1: PRINT#1, .07, .075:CLOSE
OPEN "C:\taxt.txt" FOR INPUT AS #1: READ#1

Le programme fonctionne bien et il va écrire dans le fichier taxe.txt .07
.075
mais lorsqu'il va lire, j'ai un message: Expected: variable

J'ai tout essayé et ca ne marche pas

Merci à l'avance

7 réponses

Avatar
DanC
et le nom du fichier? tantôt c'est taxe.txt et en input c'est taxt.txt...
ça peut-il être cela?
Bonne chance!
Danielle

"hotrock" a écrit dans le message de
news:x73Wc.2848$
Bonjour !

Je ne trouve pas de site pour qbasic45 français alors il y a peut être
quelqu,un qui pourrait m'aider ici ?

J'ai une routine qui fonctionne en écriture mais pas en lecture la voici:

CLOSE
OPEN "C:taxe.txt" FOR OUTPOUT AS #1: PRINT#1, .07, .075:CLOSE
OPEN "C:taxt.txt" FOR INPUT AS #1: READ#1

Le programme fonctionne bien et il va écrire dans le fichier taxe.txt .07
.075
mais lorsqu'il va lire, j'ai un message: Expected: variable

J'ai tout essayé et ca ne marche pas

Merci à l'avance







Avatar
michdenis
Bonjour hotrock,

Je n'y connaît rien en QBasic45,

Mais tu as une faut d'orthographe sur cette ligne dans le nom du fichier :

OPEN "C:taxt.txt" FOR INPUT AS #1: READ#1


Salutations!


"hotrock" a écrit dans le message de news:x73Wc.2848$
Bonjour !

Je ne trouve pas de site pour qbasic45 français alors il y a peut être
quelqu,un qui pourrait m'aider ici ?

J'ai une routine qui fonctionne en écriture mais pas en lecture la voici:

CLOSE
OPEN "C:taxe.txt" FOR OUTPOUT AS #1: PRINT#1, .07, .075:CLOSE
OPEN "C:taxt.txt" FOR INPUT AS #1: READ#1

Le programme fonctionne bien et il va écrire dans le fichier taxe.txt .07
.075
mais lorsqu'il va lire, j'ai un message: Expected: variable

J'ai tout essayé et ca ne marche pas

Merci à l'avance
Avatar
DanC
ou alors, read#2, var1, var2

nommer les variables pour les remplir...
Je tiens ça de Turbo Basic!

Salutations,
Danielle

"hotrock" a écrit dans le message de
news:x73Wc.2848$
Bonjour !

Je ne trouve pas de site pour qbasic45 français alors il y a peut être
quelqu,un qui pourrait m'aider ici ?

J'ai une routine qui fonctionne en écriture mais pas en lecture la voici:

CLOSE
OPEN "C:taxe.txt" FOR OUTPOUT AS #1: PRINT#1, .07, .075:CLOSE
OPEN "C:taxt.txt" FOR INPUT AS #1: READ#1

Le programme fonctionne bien et il va écrire dans le fichier taxe.txt .07
.075
mais lorsqu'il va lire, j'ai un message: Expected: variable

J'ai tout essayé et ca ne marche pas

Merci à l'avance







Avatar
hotrock
c'est une faute de frape, merci quand même !


"DanC" wrote in message
news:
et le nom du fichier? tantôt c'est taxe.txt et en input c'est taxt.txt...
ça peut-il être cela?
Bonne chance!
Danielle

"hotrock" a écrit dans le message de
news:x73Wc.2848$
Bonjour !

Je ne trouve pas de site pour qbasic45 français alors il y a peut être
quelqu,un qui pourrait m'aider ici ?

J'ai une routine qui fonctionne en écriture mais pas en lecture la
voici:



CLOSE
OPEN "C:taxe.txt" FOR OUTPOUT AS #1: PRINT#1, .07, .075:CLOSE
OPEN "C:taxt.txt" FOR INPUT AS #1: READ#1

Le programme fonctionne bien et il va écrire dans le fichier taxe.txt
.07


.075
mais lorsqu'il va lire, j'ai un message: Expected: variable

J'ai tout essayé et ca ne marche pas

Merci à l'avance











Avatar
JièL Goubert
Bonjoir(c) hotrock

La sainte axe de lecture est la même que l'écriture.
Tu as PRINT#1, .07, .075 ce qui veut dire que tu ecrit directement les
données 0.07 et 0.075 sans passer par une variable
la lecture doit passer par une variable obligatoirement, c'est ce que te dis
ton message d'erreur. Donc :
OPEN "C:taxt.txt" FOR INPUT AS #1: READ#1, var1, var2: CLOSE

--
La FAQ Outlook est la : http://faq.outlook.free.fr
JièL / Jean-Louis GOUBERT
Co-auteur de "Internet + de 1 000 trucs de pros" chez Micro Application
http://faq.outlook.free.fr/livreMA/internet_plus_de_1000_trucs_de_pros.htm

Le 22/08/2004 17:40 vous avez écrit ceci :
Bonjour !

Je ne trouve pas de site pour qbasic45 français alors il y a peut être
quelqu,un qui pourrait m'aider ici ?

J'ai une routine qui fonctionne en écriture mais pas en lecture la voici:

CLOSE
OPEN "C:taxe.txt" FOR OUTPOUT AS #1: PRINT#1, .07, .075:CLOSE
OPEN "C:taxt.txt" FOR INPUT AS #1: READ#1

Le programme fonctionne bien et il va écrire dans le fichier taxe.txt .07
.075
mais lorsqu'il va lire, j'ai un message: Expected: variable

J'ai tout essayé et ca ne marche pas

Merci à l'avance


Avatar
docm
Bonjour.

Ca m'étonnerait que READ serve à lire un fichier.
Essaie plutôt avec INPUT.


DIM NewFile$
DIM Contents$

CLS
NewFile$ = "Hello.txt"
OPEN NewFile$ FOR INPUT AS #1
DO WHILE NOT EOF(1)
INPUT #1, Contents$
PRINT Contents$
LOOP

CLOSE #1


"hotrock" wrote in message
news:x73Wc.2848$
Bonjour !

Je ne trouve pas de site pour qbasic45 français alors il y a peut être
quelqu,un qui pourrait m'aider ici ?

J'ai une routine qui fonctionne en écriture mais pas en lecture la voici:

CLOSE
OPEN "C:taxe.txt" FOR OUTPOUT AS #1: PRINT#1, .07, .075:CLOSE
OPEN "C:taxt.txt" FOR INPUT AS #1: READ#1

Le programme fonctionne bien et il va écrire dans le fichier taxe.txt .07
.075
mais lorsqu'il va lire, j'ai un message: Expected: variable

J'ai tout essayé et ca ne marche pas

Merci à l'avance







Avatar
docm
Tu auras plus de détails sur QBasic ici:
http://www.cybwarrior.com/articles/?id=6


"docm" wrote in message
news:
Bonjour.

Ca m'étonnerait que READ serve à lire un fichier.
Essaie plutôt avec INPUT.


DIM NewFile$
DIM Contents$

CLS
NewFile$ = "Hello.txt"
OPEN NewFile$ FOR INPUT AS #1
DO WHILE NOT EOF(1)
INPUT #1, Contents$
PRINT Contents$
LOOP

CLOSE #1


"hotrock" wrote in message
news:x73Wc.2848$
Bonjour !

Je ne trouve pas de site pour qbasic45 français alors il y a peut être
quelqu,un qui pourrait m'aider ici ?

J'ai une routine qui fonctionne en écriture mais pas en lecture la
voici:



CLOSE
OPEN "C:taxe.txt" FOR OUTPOUT AS #1: PRINT#1, .07, .075:CLOSE
OPEN "C:taxt.txt" FOR INPUT AS #1: READ#1

Le programme fonctionne bien et il va écrire dans le fichier taxe.txt
.07


.075
mais lorsqu'il va lire, j'ai un message: Expected: variable

J'ai tout essayé et ca ne marche pas

Merci à l'avance