Fichier en vb6Résolu

Question

j'ai plusieurs zone texte ! et je veux ecrire et lire chaque zone texte a partir de 2 bouttons ecrire et lire ... ! 
?
Private Sub cmdDecrire_Click()
Open "C:\vb\Fichier.Txt" For Output As #1 'on ouvre le fichier'
Print #1, Txtdescr.Text ' on ecrit dans le fichier'
Close #1
Open "C:\vb\Fichier.Txt" For Output As #1
Print #1, Txtjour.Text
Print #1, Txtmois.Text
Print #1, Txtanne.Text
Print #1, Txtimpo.Text
End Sub

Utilisateur anonyme · Accepted Answer

Comme dirait Creton (cf La petite vie) : "Vous pouvez répéter la question ?"

3omarr · Answer

j'ai plusieurs zone texte ! je veut l'ecrire dans le fichier a la fois!!! 
si je met
Private Sub cmdDecrire_Click() 
Open "C:\vb\Fichier.Txt" For Output As #1 'on ouvre le fichier' 
Print #1, Txtdescr.Text ' on ecrit dans le fichier' 
Close #1 
 ca marche  mais si j'ajoute Print #1, Txtjour.Text 
Print #1, Txtmois.Text 
Print #1, Txtanne.Text 
Print #1, Txtimpo.Text 
ne marche pas......

cs_Jack · Answer

Pas bonjour non plus

Private Sub cmdDecrire_Click()
    Open "C:\vb\Fichier.Txt" For Output As #1
    Print #1, Txtdescr.Text
    ' Ici, tu fermes ton fichier
    Close #1  
    ' Ici, tu réouvres le même fichier
    ' Les données écrites juste au dessus seront perdues
    Open "C:\vb\Fichier.Txt" For Output As #1 
    Print #1, Txtjour.Text
    Print #1, Txtmois.Text
    Print #1, Txtanne.Text
    Print #1, Txtimpo.Text
    ' Ici, manque un Close
End Sub
Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Le savoir est la seule matière qui s'accroit quand on le partage (Socrate)

Fichier en vb6

3 réponses

Votre réponse

Discussions similaires