Ré-enregistrer un txt

Question

salut

j'explique mon probleme....j'ai une TextBox et j'enregistre son contenu sur un txt apres avoir demandé la destination:

chemins = InputBox("destination", "destination")
Open chemins For Output As #1
Print #1, text.text
Close #1
Enregistrer = Enabled

apres mon bouton Enregistrer devient cliquable mais j'arrive pas à lui demander d'enregistrer sur le meme fichier....pourtant j'utilise la meme variable !!! :

Open chemins For Output As #1
Print #1, text.text
Close #1

voilà !!!
merci pour les réponses

gaa179 · Answer

C'est normal, tu as fait close juste avant et tu n'as pas rouvert le fichier.

A

clems45 · Answer

merde je me suis loupé pour le message !!!

sinon pour le fait que mon fichier soit fermé !! comment je fais pour pas qu'il se ferme parceque j'ai essayé de retirer Close mais dans ce cas là il n'écrit pas les données et  Open n'ouvre pas le fichier ?

cs_liquide · Answer

chez moi ca marche, peut etre (hypothèse) que la variable chemins n'est pas dans une variable générale placé en entete 


Dim chemins As String

Private Sub Command1_Click()
Open chemins For Output As #1
Print #1, Text1.Text
Close #1

End Sub

Private Sub Command2_Click()
chemins = InputBox("destination", "destination")
Open chemins For Output As #1
Print #1, Text1.Text
Close #1

End Sub


bonne prog
liquide

clems45 · Answer

merci ca marche !!!

Ré-enregistrer un txt

4 réponses

Discussions similaires