Discussion :

[usoft]

Salut
j'ai lu les tutorieau de visual basic et j'ai comprés comment faire pour cree un fichier .
mais j'ai des question ? comment faire pour engestré par exemple un contenus d'un textbox dans fichier aprés le faire creé Et ou je peu trouvé Les autre commande qui conserne Les fichier Et les répertoire ?!
par exeple engestre dans un fichier ? acceder au contenus d'un fichier ..

Remarque : c'est pour Visual basic 6

Merci .

[leroissejp]

Bonsoir,
Place sur ta Form un CommandButton et un TextBox (Propriété Multiligne à True.)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
 
Private Sub Command1_Click()
Dim str1
str1 = Text1.Text
 
'Crée le fichier LuResult.txt sur le disque C:\ et copie les données du TextBox.
 
Open "C:\LuResult.txt" For Output As #1
Print #1, str1
Close #1
End Sub
 
Private Sub Form_Load()
 
'Ouvre le fichier dans le TextBox, si tu le modifie, tu cliques sur Command1 qui enregistrera le nouveau fichier
 
Dim crlf, tout, texte
On Error Resume Next
crlf = Chr(13) + Chr(10)
Open "C:\LuResult.txt" For Input As #1
Line Input #1, texte
tout = texte
If Len(tout) <> 0 Then
While Not EOF(1)
Line Input #1, texte
tout = tout + crlf + texte
Wend
End If
Text1.Text = tout
Close #1

jpleroisse

[ouskel'n'or]

Hello usoft,

La solution de leroissejp te permet de placer le contenu d'un fichier dans un textBox...
Si tu veux au contraire enregistrer le contenu d'un textBox dans un fichier (ce que j'ai compris), tu demandes.


A+

[Megaxel]

Tiens?
Moi, il me semble bien que le début du bout de code de JP enregistre le contenu du textbox dans un fichier.
Non?

[ouskel'n'or]

Effectivement, j'ai sauté les quatre premières lignes
Pa idée de mettre des solutions exhaustives...

A+

[jemigo]

par contre lors de l'enregistrement des données en .txt la mise en forme définie dans le textbox change.

notamment au niveu des tabulations.

Pouvons nous remédier à cela!!!???

[ouskel'n'or]

Tu as mis 36 jours pour t'en rendre compte ? L'avance pas ton appli !...
Désolé mais pour ce soir, je passe la main.
(... mais si tu es toujours là, je regarderai ça le 25 décembre)

A+ quand même

[jemigo]

arrète de stresser !! je ne lis pas tous les messages!!! et pis entre temps j'étais en vacances!!

donc forcément que j'ai mis 36 jours pour m'en rendre compte!!!

[Megaxel]

Surtout que ce n'est pas lui qui a posé la question au départ, Ousk'.
Donc ce n'est pas son appli...

[ouskel'n'or]

Pas de problème, comme t'es tout cool, tu patienteras bien une semaine ou deux...

A demain quand même

[Megaxel]

Et
JOYEUX NOEL A TOUS !!!!!!

[jemigo]

Bonjour,

Je souhaite sous VBA enregistrer des données contenu dans un textbox dans un fichier .txt. Je veux que l'extension soit par défaut .txt

De plus je veux choisir le chemin d'accès pour enregistrer le fichier. d'autre part, je ve pouvoir enregistrer le fichier dans un répertoire qui n'existe pas!! Peux t-on faire en sorte qu'il créer un rep non existant à l'enregistrement!!!

mon code est le suivant pour le moment :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
 
Dim enregistrer
Dim Rep As String
 
'enregistrer le fichier de config en .txt
Rep = InputBox("Entrer le nom du fichier (ne pes oublier le \ et : )", _
                "Save As Configuration", "H:\.txt")
 
enregistrer = recapitulatif.Text
Open Rep For Output As #1
Print #1, enregistrer
Close #1  'fermeture du fichier

merci

[Megaxel]

C'est nouveau, ça: piquer le post de quelqu'un pour y poser sa question, qui n'a (presque) rien à voir avec le post d'origine.

[jemigo]

bah non!! j'ai juste besoin d'une info pour pouvoir avancer!!

ca fait un peti moment que je bloque dessus!!

Désolé je pensais que c'était un endroit d'entraide où l'on pouvait poser des question pour avancer!!

D'ailleurs ca peut très bien intéresser d'autre personne!

enfin dsl si c'est pas comme ca que ca marche!! mais pourrais tu au moins me dire ce que je dois faire pour poser cette demande!!!

merci

[Megaxel]

Mais c'est justement parce que ça peut intéresser d'autres personnes qu'il est important de mettre une question par post, sinon, comment veux-tu que les autres puissent exploiter cet échange plus tard.
Quant au fait que ce forum est un forum d'entraide, où on peut poser des questions, mais bien sûr, que c'est ça, et tu es même sur l'un des meilleurs (en tout cas, de ceux que j'ai pu essayer...).
Maintenant, pour te prouver que je ne t'en veux pas: tu as un gros bouton "Nouveau" en haut de l'index du forum, qui te permet de poser une question rien qu'à toi.

[ouskel'n'or]

Tu sélectionnes Nouveau, en bas et à gauche, là tu as une fenêtre qui s'ouvre où tu peux placer ta question.
N'oublie pas de mettre "brièvement" le sujet de ta question et de préciser VB ou VBA.

épuicétou !

A+ sur le forum où tu ne va pas tarder à t'apercevoir qu'il y a (presque) toujours une bonne âme pour te répondre.

A+