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 :

VBS function AD/LDAP


Sujet :

VBScript

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Futur Membre du Club
    Profil pro
    Inscrit en
    Mai 2009
    Messages
    3
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2009
    Messages : 3
    Par défaut VBS function AD/LDAP
    Bonjour, j'ai une question sur la fonction du LDAP et de l'active directory.
    Je souhaite supprimer un contact de mon AD en cliquant sur le script mais à ce script je veux ajouter la fonction que ce contact se supprime si le USERNAME = administrateur (quand l'user se connecte grâce à un compte utilisateur windows exemple : M.martin) , l'username se voit en tappant set dans le cmd windows , je ne sais comment créer cette fonction.
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    strComputer = " " 
     
    set objComputer = GetObject("LDAP://CN=" & strComputer & _ 
    ",CN=x,DC=x,DC=com") 
    objComputer.DeleteObject (0)
    ceci est mon script qui fonctionne sans la fonction que je veux introduire
    Merci pour vos futurs reponses.

  2. #2
    Membre expérimenté
    Inscrit en
    Mai 2008
    Messages
    189
    Détails du profil
    Informations forums :
    Inscription : Mai 2008
    Messages : 189
    Par défaut
    obtenir le nom de la personne :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    Set WshNetwork = WScript.CreateObject("WScript.Network")
    wscript.echo WshNetwork.UserName
    Avec cette valeur, tu peux ensuite faire un if instr(WshNetwork.UserName,"Administrateur") et comparer le résultat...

  3. #3
    Futur Membre du Club
    Profil pro
    Inscrit en
    Mai 2009
    Messages
    3
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2009
    Messages : 3
    Par défaut
    je vais essayer ca tout de suite merci.

Discussions similaires

  1. [probleme] Script VBS LDAP + WMI + Excel
    Par Etienne76 dans le forum VBScript
    Réponses: 0
    Dernier message: 21/05/2010, 11h58
  2. Réponses: 5
    Dernier message: 12/02/2010, 17h18
  3. Echec de mise à jour Ldap en Vbs
    Par nucera dans le forum VBScript
    Réponses: 0
    Dernier message: 28/11/2009, 19h04
  4. requête LDAP dans script vbs
    Par Vincent84 dans le forum VBScript
    Réponses: 0
    Dernier message: 04/11/2009, 18h10
  5. [LDAP] undefined function ldap_connect()
    Par crashyear dans le forum Bibliothèques et frameworks
    Réponses: 1
    Dernier message: 29/01/2008, 15h27

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