Home Page
Articoli
Tips & Tricks
News
Forum
Archivio Forum
Blogs
Sondaggi
Rss
Video
Utenti
Chi Siamo
Contattaci
Username:
Password:
Login
Registrati ora!
Recupera Password
Home Page
Stanze Forum
App. WinForms / WPF .NET
Gestione dei permessi utente su una cartella
martedì 21 settembre 2010 - 15.16
Elenco Threads
Stanze Forum
Aggiungi ai Preferiti
Cerca nel forum
Elenco Tags
VB.NET
|
.NET 2.0
|
Windows 7
|
Windows Vista
|
Windows XP
|
Visual Studio 2008
delki
Profilo
| Newbie
7
messaggi | Data Invio:
mar 21 set 2010 - 15:16
Buongiorno a tutti,
sto sviluppando una applicazione con VB.NET 2008 e vi espongo brevemente il mio problema: l'applicazione crea delle cartelle su disco, crea gli utenti necessari nel sistema, ed applica a ciascun utente particolari permessi a determinate cartelle. Fin qui tutto bene, il problema con il quale devo fare i conti è che se verifico a livello di sistema operativo, i permessi applicati alla cartella sono di tipo: "Applica a: SOLO ALLA CARTELLA SELEZIONATA", mentre mi serve poetr definire che il tipo di permesso applicato deve essere del tipo: "Applica a: SOLO ALLA CARTELLA SELEZIONATA, LE SOTTOCARTELLE E I FILES".
La routine che applica i diritti è riportata in calce, qualcuno è in grado di fornirmi il suggerimento giusto?
Grazie in anticipo a tutti
Delki
Private Sub AddDirittiBase(ByVal Path As String, ByVal Account As String)
Try
Dim dInfo As New DirectoryInfo(Path)
Dim dSecurity As DirectorySecurity = dInfo.GetAccessControl
Dim Rule1 As New FileSystemAccessRule(New System.Security.Principal.NTAccount(Account), _
FileSystemRights.Traverse _
+ FileSystemRights.Read, _
AccessControlType.Allow, _
PropagationFlags.NoPropagateInherit, _
AccessControlType.Allow)
Dim Rule2 As New FileSystemAuditRule(New System.Security.Principal.NTAccount(Account), _
FileSystemRights.Traverse _
+ FileSystemRights.Read, _
AuditFlags.Success, _
PropagationFlags.NoPropagateInherit, _
AuditFlags.Success)
Dim Riuscita1 As Boolean
Dim Riuscita2 As Boolean
dSecurity.ModifyAccessRule(AccessControlModification.Add, Rule1, Riuscita1)
dSecurity.ModifyAuditRule(AccessControlModification.Add, Rule2, Riuscita2)
dInfo.SetAccessControl(dSecurity)
Catch ex As Exception
End Try
End Sub
Distinti saluti
DelkTrolese
Torna su
Stanze Forum
Elenco Threads
Partecipa anche tu! Registrati!
Hai bisogno di aiuto ?
Perchè non ti registri subito?
Dopo esserti registrato potrai chiedere
aiuto sul nostro
Forum
oppure aiutare gli altri
Consulta le
Stanze
disponibili.
Registrati ora !