GESTION DES FICHIERS EN GFA BASIC
Comme cette rubrique ne m'intéresse pas vraiment c'est loin d'être complet
Je la met quand même mais pour ceux qui cherchent quelque chose de précis n'hésitez pas à me poser vos question : scalion@free.fr
veuillez m'en excusez mais je remédierais plus tard à cette lacune !
- Lire un fichier texte :
FULLW #1
OPEN "I",#1,"C:\AUTOEXEC.BAT"
WHILE NOT EOF(#1)
LINE INPUT #1,A$
PRINT A$
WEND
CLOSE #1
PRINT "Fin du fichier, appuyez sur une touche ."
KEYGET rien%
CLOSEW #1
- Ecrire une chaine de caractère à la fin d' un fichier :
FULLW #1
OPEN "A",#1,"C:\AUTOEXEC.BAT"
PRINT #1,"Echo Fin du fichier autoexec.bat"
CLOSE #1
PRINT "Ligne de commande rajoutêe dans autoexec.bat, appuyez sur une touche ."
KEYGET rien%
CLOSEW #1
- Créer un fichier et y écrire une chaine de caractères :
FULLW #1
OPEN "O",#1,"C:\TEST.TXT"
PRINT #1,"La commande O de open est utilisêe"
CLOSE #1
PRINT "Fichier test.txt crêê, appuyez sur une touche ."
KEYGET rien%
CLOSEW #1
- Créer un fichier et y écrire des octets quelconque :
FULLW #1
OPEN "O",#1,"C:\TEST.BIN"
OUT| #1,48 ' 1 Octet
OUT& #1,12849 ' 2 octets
OUT% #1,12345678 ' 4 octets
CLOSE #1
PRINT "Fichier test.bin de 7 octets crêê, appuyez sur une touche ."
KEYGET rien%
CLOSEW #1
- Ouvre un fichier et lit un octet quelconque :
FULLW #1
OPEN "R",#1,"C:\AUTOEXEC.BAT"
SEEK #1,2
O| = INP|(#1)
PRINT "Le deuxiéme octet du fichier a la valeur " + STR$(O|)
CLOSE #1
PRINT "Fin de lecture en mode binaire, appuyez sur une touche ."
KEYGET rien%
CLOSEW #1