deedstacktyk
Messages postés28Date d'inscriptionsamedi 4 mai 2002StatutMembreDernière intervention15 avril 2003 3 nov. 2002 à 10:53
pour lire toutes les lignes
dim chaineObtenue as string
Open "fichier.mem" For Input As #1
While (EOF(1) = False)
Input #1, chaineObtenue
'insérer son code de traitement
Wend
Close #1
pour ecrire une lignes dans le fichier
dim chaineAEcrire as string
'initialiser la chaine a ecrire dans la variable
Open "fichier.mem" For Append As #1
Print #1, chaineAEcrire
Close #1