SaveFileDialog et Forcer l'Extension

Salut All,

J'ai un petit probleme avec l'utilisation d'un SaveOpenDialog en voulant forcer l'extension du nom du fichier saisi.
Actuellement, si on ne signale pas d'extension, il l'a rajoute automatiquement (ca c'est ok), mais si on signale une extension, il la garde et n'ajoute pas la bonne extension !!!
Ce que moi je desire, c'est que s'il y a deja une extension, il rajoute en plus la bonne.

Voici ma config du SOD

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

With SaveFileDialog .AddExtension = True .CheckFileExists = False .CheckPathExists = True .CreatePrompt = False .DefaultExt = Data_Extension .Filter = Data_Extension .InitialDirectory = Data_CheminSAVE .OverwritePrompt = True .RestoreDirectory = False .Title = "BlaBla" .ValidateNames = True End With

---

Si qq connait comment faire cela directement dans la config du SOD, merci à lui de m'eclairer.
Je peux faire cela manuellement, mais je trouve bizarre que ca ne soit pas directement inclus dans le SaveFileDialog.

Bon, en fait les dialogs n'ont pas cette possibilite.
Il faut le faire soit-meme !!!

Code:

---

1 2 3 4 5

If Microsoft.VisualBasic.Right(SaveFileDialog_X.FileName, 4) = "." & Data_Extension Then NomDuFichier = SaveFileDialog_X.FileName Else NomDuFichier = SaveFileDialog_X.FileName & "." & Data_Extension End If

---