Lire et ecrire dans un fichier texte.
Ce code est complet. (Pas comme celui de Zarbiboss)
Source / Exemple :
' *** Ecrire dans un fichier ***
'Ouvre le fichier c:\MonFichier
Open "c:\MonFichier" For Output As #1
'Ecrit Mon Texte dans le fichier
Print #1, "Mon Texte"
'Ferme le fichier
Close #1
' *** Lire un fichier ***
' Declare la variable Var1
Dim Var1
'Ouvre le fichier
Open "C:\Monfichier" For Input As #2
'Lit la première ligne et la place dans Var1
Input #2, Var1
'Ferme le fichier
Close #2
'Affiche le résultat dans un Msgbox
MsgBox "Le fichier contient : " & Var1
'Si vous voulez lire plusieurs ligne :
' Declare la variable Var1 et Var2
Dim Var1
Dim Var2
'Ouvre le fichier
Open "C:\Monfichier" For Input As #2
'Lit la première ligne et la place dans Var1
Input #2, Var1
Input #2, Var2
'Ferme le fichier
Close #2
Conclusion :
Assez simple avec la description des lignes.
Pour écrire sur plusieurs lignes faites la même chose que pour lire plusieurs lignes.
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.