Enregistrer textbox en fichier txt en cours

john57833 Messages postés 3 Date d'inscription lundi 23 mai 2005 Statut Membre Dernière intervention 9 janvier 2007 - 31 mai 2005 à 14:37
jpleroisse Messages postés 1788 Date d'inscription mardi 7 novembre 2000 Statut Membre Dernière intervention 11 mars 2006 - 31 mai 2005 à 19:53
Bonjour tout le monde,
J'ai fait un éditeur de texte simplifiée mais pour la fonction enregistrer je n'arrive pas à faire enregistrer mon texte dans le fichier texte ouvert ou déja enregistré sous.
Voici mon code:

Private Sub Enregistrer_Click(Index As Integer)


Open "C:\essai.txt" For Output As #1
Print #1, Text1.Text
Close #1

End Sub

Que mettre a la place de "C:\essai.txt" pour qu'il enregistre a chaque fois sur le fichier en cours d'utilisation???(et non un fichier avec chemin et nom fixe)
C'est très urgent, je vous remercie de votre aide!
John

3 réponses

cs_ITALIA Messages postés 2169 Date d'inscription vendredi 20 avril 2001 Statut Membre Dernière intervention 30 juin 2009 9
31 mai 2005 à 14:57
Tu ne connais jamais le chemin du fichier ?

It@li@
0
john57833 Messages postés 3 Date d'inscription lundi 23 mai 2005 Statut Membre Dernière intervention 9 janvier 2007
31 mai 2005 à 15:50
non mais ce n'es pas grave , j'ai fini mon projet donc je n'ai pu vraiment besoin de cette fonction, vous remerciant d'avoir voulu m'aider.

John
0
jpleroisse Messages postés 1788 Date d'inscription mardi 7 novembre 2000 Statut Membre Dernière intervention 11 mars 2006 27
31 mai 2005 à 19:53
Bonjour,

Tu dois créer une variable pour enregistrer. Si tu as un groupe de
Textbox (Index As Integer) tu dois indiquer l'index du TextBox à
enregistrer.



Private Sub Enregistrer_Click(Index As Integer)

Dim texte

texte = Text1(0).Text

Open "C:\essai.txt" For Output As #1

Print #1, texte

Close #1

End Sub



jpleroisse
0
Rejoignez-nous