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

VBScript Discussion :

Récupérer les droits utilisateurs d'un répertoire


Sujet :

VBScript

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Nouveau candidat au Club
    Inscrit en
    Juillet 2007
    Messages
    1
    Détails du profil
    Informations forums :
    Inscription : Juillet 2007
    Messages : 1
    Par défaut Récupérer les droits utilisateurs d'un répertoire
    Bonjour à tous,

    Je recherche depuis un certain temps, une possibilité (un script VBS) pour récupérer les droits d'accès (domain\GRPIT - Modify | domain\GRPFinance - Read) sur un répertoire réseaux pour créer un fichier Excell d'audit.

    Le problème est que j'ai trouvé le moyen pour modifier les droits mais pas pour les récupérer.

    Exemple :

    J'ai un répertoire sur le réseau (W:\Groupes IT) qui est accessible que par les membres IT ( utilisation d'un active directory ). Ce que j'aimerais c'est que mon script récupère le nom de tous les utilisateurs qui ont accès sur ce répertoire (mon problème). Puis envoie ces informations dans un fichier Excell ( pour cela aucun problème ).
    Est-ce que quelqu'un peut m'aider pour cela ?
    J'ai trouvé des tools qui exécute cela mais mon objectif est que mon script fonctionne.

    En vous remerciant d'avance.

  2. #2
    Membre averti
    Inscrit en
    Juin 2007
    Messages
    31
    Détails du profil
    Informations forums :
    Inscription : Juin 2007
    Messages : 31
    Par défaut
    Bonjour, je suis interressé par ton script de modification des droits J'ai un soucis avec l'Héritage des droits et j'aurai aimé savoir si ton script permet de modifier ce paramètre. Par avance, merci.

    Pour ton problème, je ne sais pas si ça peut correspondre, mais j'ai fait ça :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    strCheminDossier = "W:\Groupes IT"
    Set objWMIDroits = GetObject("winmgmts:").Get("win32_LogicalFileSecuritySetting='" & strCheminDossier & "'")
    RetVal = objWMIDroits.GetSecurityDescriptor(ObjWMISecurityDescriptor)
    colDACL = objWMISecurityDescriptor.DACL
     
    For Each objACE In colDACL
          Set objTrustee = objACETrustee
          'Ton code pour écrire dans ton ficher Excel
          'tu peux récupérer objACE.AccessMask, objACE.AceType, objACE.AceFlags, objTrustee.Name et autres
    Next
    Pour plus d'infos va sur http://msdn2.microsoft.com/en-us/library/aa394180.aspx
    Bonne journée

Discussions similaires

  1. Récupérer les droits d'accès de chaque utilisateur
    Par fernandao dans le forum Shell et commandes GNU
    Réponses: 5
    Dernier message: 17/01/2013, 19h51
  2. C# Récupérer les droits sur un répertoire
    Par PORTES dans le forum Windows Forms
    Réponses: 1
    Dernier message: 20/10/2006, 19h03
  3. Question sur les droits utilisateurs??
    Par chaser_T dans le forum Outils
    Réponses: 3
    Dernier message: 01/09/2005, 19h38
  4. Question sur les droits utilisateurs
    Par gibet_b dans le forum Administration système
    Réponses: 5
    Dernier message: 14/06/2005, 15h24
  5. Réponses: 5
    Dernier message: 06/03/2003, 13h27

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