[VBS]Récupérer DN dans AD

Récupérer DN dans AD [VBS] - Langages fonctionnels - Programmation

Marsh Posté le 12-03-2008 à 14:33:55    

Bonjour,
 
Je souhaiterais récupérer le Nom + Prénom d'un utilisateur enregistré dans AD mais aucune idée me vient à l'esprit. J'ai besoin de mettre le résultat dans une variable que j'utiliserais pour nommer des dossiers (un dossier par utilisateur).
 
Je n'arrive même pas à me connecter à AD :x Pourriez-vous m'aiguiller dans cette démarche ?
 
Merci !


Message édité par freust le 12-03-2008 à 16:24:11
Reply

Marsh Posté le 12-03-2008 à 14:33:55   

Reply

Marsh Posté le 12-03-2008 à 14:34:52    

OUps j'ai oublié de mettre un titre .... je suis désolé, je n'ai pas le moyen d'éditer mon message ?

Reply

Marsh Posté le 12-03-2008 à 15:20:06    

Tu peux éditer ton premier message pour mettre ton titre.
 
Tu trouveras de quoi commencer ton script la par exemple : http://www.computerperformance.co. [...] /index.htm
 
Tu comptes localiser ton utilisateur comment, via son login ? Si oui, je dois avoir un peu de code qui fait ca.

Reply

Marsh Posté le 12-03-2008 à 15:34:34    

Un exemple de script qui te récupère le mail d'un user dont on spécifie le login :
 

Code :
  1. Set objDSE = GetObject("LDAP://rootDSE" )
  2. set oConnection = CreateObject("ADODB.Connection" )
  3. oConnection.Provider = "ADsDSOObject"
  4. oConnection.Open "ADs Provider"
  7. monUser = "toto"
  9. ' filtre sur le login utilisateur
  10. sFilter = "(&(objectclass=user)(samaccountname=" & monUser & " ))"
  12. ' On filtre la requête pour récupérer le mail
  13. sQuery = "<LDAP://" & objDSE.Get("defaultNamingContext" ) & ">;" & sFilter & ";Mail;subtree"
  14. Set oRecordSet = oConnection.Execute(sQuery)
  16. usrDN = oRecordset.Fields("Mail" ).value
  17. oConnection.Close
  18. wscript.echo usrDN

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed