[VB.NET] Boite de dialogue enregistrer

cs_elodierousseau Messages postés 9 Date d'inscription mercredi 25 février 2004 Statut Membre Dernière intervention 7 avril 2004 - 30 mars 2004 à 12:11
sturtrid Messages postés 133 Date d'inscription dimanche 20 mai 2007 Statut Membre Dernière intervention 13 juillet 2012 - 29 juin 2008 à 09:36
J'aimerai bien utliser la boite de dialogue toute faite pour enregistrer un fichier mais j'aimerai que l'utilisateur n'ait accès qu'au lecteur A:\ et son lecteur CD. Je ne veux pas qu'il puisse enregistrer son fichier sur le C:\.

;) Est-ce que vous avez une idée?

1 réponse

sturtrid Messages postés 133 Date d'inscription dimanche 20 mai 2007 Statut Membre Dernière intervention 13 juillet 2012 1
29 juin 2008 à 09:36
Salut tout le monde !

  (je repost ici car je pense m'être trompé... Sorry)

Bon, je cherchais tout autre chose, mais le destin m'a guidé jusqu'a ce vieux post...
Il n'est plus d'actualité, mais si certains d'entres vous se demandent encore comment faire,
voici une solution. J'ai placé le tout dans l'évènement Click d'un bouton.

   
Private Sub MonBouton_Click _
   
(ByVal sender
As System
.Object
,ByVal e
As System
.EventArgs
) _
   
Handles

MonBouton



.
Click

        If (sFDlg.ShowDialog = Windows.Forms.DialogResult.OK)Then

           If 


(sFDlg.

FileName.StartsWith


(



"C:"



)



)



Then

                MessageBox.Show


(



"Veuillez choisir un autre emplacement"
,
"Disque interdit !"



)




                MonBouton_Click


(


Nothing, Nothing

)




:

Exit Sub

            End If

            MessageBox.Show



(




"Chemin accepté : "

&



sFDlg.

FileName



,

"Disque autorisé !"




)





            My.Computer.FileSystem.WriteAllText



(



sFDlg.

FileName



,




Nothing

,

False




)





        End If

    End Sub

Vala, il me semble que c'est concis... Et les conditions largement modifiables !
(Du genre changer mon If en If Not...)

Il est temps de retourner à ma quête première... ++

________________________________________________________
On passe presque toute sa vie déguisé en ad
0
Rejoignez-nous