Discussion :

[turican2]

Bonjour,

j'aimerai savoir comment il serait possible de sauvegarder le contenu d'un textbox dans un fichier à partir d'un SaveFileDialog.

J'ai créé un bouton dans un winform et je voulais implémenter un code comme celui ci:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
    Dim swFichier As StreamWrtier 
    swFichier = New StreamWriter("c:\toto.txt", False) 
 
    If saveFileDialog1.ShowDialog() = DialogResult.OK Then
          swFichier.write(Textbox1.Text)
          swfichier.close()
          swfichier = nothing
    End If
end sub

L'ennui evidement c'est que toto.txt n'est pas du tout dynamique et par conséquent ce n'est pas l'utilisateur qui indique à l'application où aller sauvegarder le fichier.
Quelqu'un aurait il une idée et me dire comment m'y prendre pour rendre le c:\toto.txt en une chose que l'utilisateur va sélectionner par le saveFileDialog?

Merci à vous

[StormimOn]

Regarde donc la documentation de la classe SaveFileDialog et tu auras ta réponse. Petit indice ce qui t'intéresse c'est une propriété ou une méthode suivant ce que tu veux en faire

[turican2]

merci de ta réponse rapide :-)... j'avais cette doc dans le MSDN mais je vois pas comment lui dire le contenu de mon textbox vers un fichiers (qui n'existe pas forcement).
Je regarderai à tete reposé... trop longtemps que je suis debout là

[Ogotcha]

Tiens voici une petite ligne de permettant d'écrire dans un fichier texte :

Code :

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

My.Computer.FileSystem.WriteAllText(chemindetonfichier, textbox.text, True)

[turican2]

L'idée était d'avoir une sauvegarde d'un path choisi par l'utilisateur et non par un "chemindetonfichier"

ce code résouds donc mon souci:

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
 
    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
 
        SaveFileDialog1.Filter = "txt files (*.txt)|*.txt|All files (*.*)|*.*"
        SaveFileDialog1.FilterIndex = 2
        SaveFileDialog1.RestoreDirectory = True
 
        If SaveFileDialog1.ShowDialog() = DialogResult.OK Then
            Dim fileNumber As Integer
            fileNumber = FreeFile()
            FileOpen(fileNumber, SaveFileDialog1.FileName, OpenMode.Output)
            PrintLine(fileNumber, TextBox5.Text)
            FileClose(fileNumber)
        End If
 
    End Sub

j'imagine que c'est un probleme courant et donc j'aurais aimé trouver ce bout de code dans la section FAQ vb.net

Pour rappel :
- dans le form[Design] j'ai créer l'objet SaveFileDialog1
- J'ai créé un bouton et lorsque je clique, j'exporte le contenu d'un textbox dans un fichier sélectionné par l'utilisateur.