read only dossier

Salut la compagnie,

Code:

---

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

' Create a new DirectoryInfoobject. Dim dInfo As New DirectoryInfo("c:\" + monDossier)   Dim iFlag As InheritanceFlags = InheritanceFlags.ContainerInherit Dim pPropogate As PropagationFlags = PropagationFlags.InheritOnly   ' Get a DirectorySecurity object that represents the ' current security settings. Dim dSecurity As DirectorySecurity = dInfo.GetAccessControl()   ' Add the FileSystemAccessRule to the security settings. dSecurity.AddAccessRule(New FileSystemAccessRule("Tout le monde", FileSystemRights.Read, iFlag, pPropogate, AccessControlType.Allow)) ' Set the new access settings. dInfo.SetAccessControl(dSecurity)

---

ce code fonctionne. Si je vais voir mon dossier, dans sécurité, je vois l'utilisateur "tout le monde" avec "autorisation speciale".

le but serait de virer toutes les autres autorisations pour que tout le dossier soiit en readonly pour TOUT le monde.

mon programme telecharge des fichiers qui NE doivent PAS etre supprimés. Il faut absolument d'un moyen ou d'un autre que les utilisateurs du programme ne peuvent rien faire sur ces fichiers par défaut.

s'il vous plait, quelqu'un pour me donner la méthode?

PS: je suis ouvert à n'importe quelle autre méthode (dossier protégé par mot de passe, popup a l'ouverture du fichier disant qu'ils ne doivent pas etre supprimés, ...) Bref, un truc qui avertit le user quoi

Sachant que par la suite, ils y auront acces meme si le programme est fermé

Merci d'avance