OpenFileDialog créé le fichier si il n'existe pas
Bonjour,
J'utilise ce code pour récupérer le chemin d'un fichier et cela fonctionne sans problème.
Mon problème est que j'aimerais aussi pouvoir créer le fichier si il n'existe pas... Est-il possible de lui dire de créer le fichier ou y a-t-il une option pour faire apparaitre un bouton "Créer" à côté de "Ouvrir" ?
Exemple : pouvoir créer un Profil2.txt
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22
| Dim OFD As New OpenFileDialog
OFD.CheckFileExists = True
OFD.CheckPathExists = True
OFD.AddExtension = True
'OFD.InitialDirectory = "C:\"
OFD.Title = "Charger le profil"
OFD.Filter = "Text Files|*.txt"
OFD.FileName = "Profil.txt"
If OFD.ShowDialog() = Windows.Forms.DialogResult.Cancel Then
'MessageBox.Show("test message")
Exit Sub
End If
'Process.Start(OFD.FileName)
TextBox26.Text = OFD.FileName
' Afficher Button Sauver Profil
If TextBox26.Text <> "" Then Button20.Visible = True Else Button20.Visible = False |
Merci d'avance :-)