Sauver le texte d'un textbox dans un fichier .txt

retsam Messages postés 40 Date d'inscription samedi 21 février 2004 Statut Membre Dernière intervention 23 mars 2007 - 23 juin 2005 à 23:47
dOsSpr0uTosS Messages postés 90 Date d'inscription dimanche 22 mai 2005 Statut Membre Dernière intervention 1 janvier 2006 - 29 juin 2005 à 15:31
Salut!
J'ai un petit problème. Je vous explique..
J'aimerais pouvoir sauver le texte inscrit dans un Textbox dans un fichier .txt.
Un peu comme Bloc-note
J'espère que vous me comprenez `: )
J'attend de vos nouvelles. `: )

9 réponses

kakenette Messages postés 218 Date d'inscription dimanche 1 mai 2005 Statut Membre Dernière intervention 15 novembre 2009 1
23 juin 2005 à 23:54
Open "lenomdetonfichier.txt" For Output As #1

Print #1, Text1.Text

Close #1


Ps: Text1.text par le text que tu veux exporter


kakenette
0
cs_MasterHack Messages postés 586 Date d'inscription jeudi 18 septembre 2003 Statut Membre Dernière intervention 13 février 2008 2
24 juin 2005 à 04:08
Idem, pour ajouter a un fichier faut juste
Open "lenomdetonfichier.txt" For append As #1
Print #1, Text1.Text
Close #1


<HR>

Life is short...Learn more
Copy Rights <> Rights to Copy
0
calla25 Messages postés 85 Date d'inscription lundi 26 janvier 2004 Statut Membre Dernière intervention 25 octobre 2007
24 juin 2005 à 10:07
salut
j'ai une autre solution:
Txt1 est le nom de ta zone de texte
par contre il faut que tu enregistre ton document word

Dim DocWord As Word.Document
Dim AppWord As Word.Application
Set AppWord = New Word.Application

AppWord.ShowMe
AppWord.Visible = True

'Ajoute un document
AppWord.Documents.Add

With AppWord.Selection
.TypeParagraph 'pour passer des lignes
.TypeText Text:=Txt1.text
End With

bon courage
0
retsam Messages postés 40 Date d'inscription samedi 21 février 2004 Statut Membre Dernière intervention 23 mars 2007
25 juin 2005 à 19:00
Merci pour vos réponses! je vais essayer cela.
...Retsam...
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
dOsSpr0uTosS Messages postés 90 Date d'inscription dimanche 22 mai 2005 Statut Membre Dernière intervention 1 janvier 2006
28 juin 2005 à 14:03
Salut,a quoi correspond #1 et à quoi sert le type append?
0
cs_MasterHack Messages postés 586 Date d'inscription jeudi 18 septembre 2003 Statut Membre Dernière intervention 13 février 2008 2
28 juin 2005 à 22:04
dOsSpr0uTosS > pour #1 c le numero de fichier pour que apres tu le ferme close#1,pour append c une option pour ne pas ecraser le contenu du fichier mais plutot ajouter a la suite du fichier.


<HR>

Life is short...Learn more
Copy Rights <> Rights to Copy
0
dOsSpr0uTosS Messages postés 90 Date d'inscription dimanche 22 mai 2005 Statut Membre Dernière intervention 1 janvier 2006
28 juin 2005 à 22:49
euh t'as méthode ne march pas chez moi,je met:

open
"essai.txt"
for append
as #1
Print #1,textbox1.Text
Close #1
Il met erreur erreur a open,essai.txt,for et # à la 2em et 3em lignes...
J'ai aussi essayer ca:
Dim v1
v1 = CreateObject(
"scripting.filesystemobject")
v1.copyfile(TextBox1.Text,
"C:\essai.txt")


Mais il me dis qu'il ne trouve pas le fichier alors je pense qu'il parle de la textbox 1 car le fichier text est bien au bon endroit....

PS:j'utilise Visual Basic 2005 beta donc je sais peut-etre que les commandes ont changés.......
0
cs_MasterHack Messages postés 586 Date d'inscription jeudi 18 septembre 2003 Statut Membre Dernière intervention 13 février 2008 2
29 juin 2005 à 02:00
dis mois tu es en dotnet c ça?


<HR>

Life is short...Learn more
Copy Rights <> Rights to Copy
0
dOsSpr0uTosS Messages postés 90 Date d'inscription dimanche 22 mai 2005 Statut Membre Dernière intervention 1 janvier 2006
29 juin 2005 à 15:31
C'est quoi etre en dotnet?
Et par "dis mois" tu veux dire "dis moi" non ou alors tu veux dire "dix mois" xD .
0
Rejoignez-nous