IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Windows XP Discussion :

Droits NTFS du propriétaire d'un fichier


Sujet :

Windows XP

  1. #1
    Candidat au Club
    Profil pro
    Inscrit en
    Mars 2012
    Messages
    3
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mars 2012
    Messages : 3
    Points : 3
    Points
    3
    Par défaut Droits NTFS du propriétaire d'un fichier
    Bonjour,

    Soit un répertoire sur lequel un utilisateur possède uniquement des droits en lecture, écriture, et affichage du contenu du dossier.
    Si cet utilisateur dépose un fichier dans ce répertoire, il en est le propriétaire et peut donc le modifier ensuite.

    je souhaiterais qu'il ne puisse plus modifier le fichier qu'il vient de déposer. Est-ce possible ? (sachant que je ne veux pas faire tourner un moulinette qui change le propriétaire mais définir une option ad hoc au niveau du répertoire racine - et je ne veux pas non plus l'empêcher de déposer d'autres fichiers, dans les mêmes conditions)

    merci d'avance pour vos réponses

  2. #2
    Expert éminent
    Avatar de hackoofr
    Homme Profil pro
    Enseignant
    Inscrit en
    Juin 2009
    Messages
    3 836
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 48
    Localisation : Tunisie

    Informations professionnelles :
    Activité : Enseignant

    Informations forums :
    Inscription : Juin 2009
    Messages : 3 836
    Points : 9 217
    Points
    9 217
    Par défaut Modif_NTFS.vbs

    J'ai fait une petite approche de ce que vous souhaitez faire en Vbscript et qui est inspiré un peu de mon dernier code : Comment créer un dossier et le protéger par mot de passe en vbscript
    Dans ce script est basé essentiellement dans la commande cacls.exe :
    cacls.exe: Pour afficher ou modifier des listes de contrôle d'accès (ACL) pour les fichiers et dossiers.
    Donc voila le code source de ce script enregistre-le sous par exemple Modif_NTFS.vbs
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
    32
    33
    34
    35
    36
    37
    38
    39
    40
    41
    42
    43
    44
    45
    'Vbscript pour modifier des Droits NTFS d'un Dossier et de son contenu (sous-dossiers et Fichiers)
    '© Hackoo 25/03/2012
    Dim oFSO,oFld 
    Set oFSO = CreateObject("Scripting.FileSystemObject")
    Dossier = "c:\Essai"
    If Not oFSO.FolderExists(Dossier) Then
    'Crée le repertoire
    Set oFld=oFSO.CreateFolder(Dossier)
    end if
    
    If oFSO.FolderExists(Dossier) Then
     For each Fichier in  oFSO.GetFolder(Dossier).Files
        'MsgBox "Fichier :" & Fichier.path,64,"Nom des Fichiers"
        LectureSeule(Fichier) 'chaque fichier devient en lecture seule 
      Next
    End if
     
    If oFSO.FolderExists(Dossier) Then
     For each Folder in  oFSO.GetFolder(Dossier).SubFolders
       'MsgBox "Dossier :" & Folder.Path,64,"Nom des Dossiers"
           LectureSeule(Dossier) 'chaque dossier devient en lecture seule
     Next
    End If
    
    ControlTotale(Dossier) ' Pour rendre un controle Totale du dossier parent
    
    Function LectureSeule(objet)
    Set Ws = CreateObject("WScript.Shell")
    Set ProcessEnv = Ws.Environment("Process")
    NomUtilisateur = ProcessEnv("USERNAME")
    Command = "%COMSPEC% /c Echo o| cacls "& objet &" /g " & qq(NomUtilisateur) & ":r administrateurs:r"
    Result = ws.Run(Command,0,True) 'exécution de la commande sans afficher la console MS-DOS
    End Function
    
    Function ControlTotale(objet)
    Set Ws = CreateObject("WScript.Shell")
    Set ProcessEnv = Ws.Environment("Process")
    NomUtilisateur = ProcessEnv("USERNAME")
    Command = "%COMSPEC% /c Echo o| cacls "& objet &" /g " & qq(NomUtilisateur) & ":f administrateurs:f"
    Result = ws.Run(Command,0,True) 'exécution de la commande sans afficher la console MS-DOS
    End Function
    
    Function qq(strIn)
        qq = Chr(34) & strIn & Chr(34)
    End Function
    Donc le seul inconvénient c'est qu'il faut mettre ce script en boucle infinie et qu'il s'exécute à chaque démarrage de windows. Ce que je n'ai pas codé pour le moment afin que vous puissiez le tester avant

  3. #3
    Membre éprouvé Avatar de Etre_Libre
    Profil pro
    Inscrit en
    Juillet 2010
    Messages
    750
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2010
    Messages : 750
    Points : 1 008
    Points
    1 008
    Par défaut
    Dans les droits NTFS, si jamais on met les droits "Ecriture" ok, mais pas "Modification", il ne pourra pas modifier...

    On peut aussi affiner cela dans les paramètres avancés, et enlever le compte spécial "Créateur propriétaire" car sinon dès qu'il crée un fichier ça lui augmenterait les droits.

    Or, si dès le départ il n'a pas le droit pour modifier les autorisations, il ne pourra pas s'augmenter les droits tout seul

Discussions similaires

  1. Réponses: 2
    Dernier message: 20/05/2014, 16h39
  2. [Fichiers] Changer les droits NTFS d'un fichier
    Par fregolo52 dans le forum C++
    Réponses: 4
    Dernier message: 15/12/2008, 16h40
  3. droits et propriétaire d'un fichier
    Par awalter1 dans le forum C
    Réponses: 14
    Dernier message: 05/09/2008, 12h21
  4. Propriétaire d'un fichier en NTFS
    Par numberwan dans le forum Langage
    Réponses: 4
    Dernier message: 25/04/2003, 09h22
  5. Réponses: 2
    Dernier message: 26/06/2002, 14h16

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo