Développement Script ADSI Active Directory List AD Objects

Liste_Comptes.vbs 1.1

Liste les objets de l'AD et leurs propriétés essentielles au format csv.

Auteur: Emmanuel Dreux
Date de publication : 02 Février 2009

Développement Script ADSI

Développement Script ADSI LDAP Active Directory

Description
Ce script VBS permet de lister les objets Active Directory de votre choix ( Utilisateurs, ordinateurs ou groupes) dans le domaine et l'OU choisi.
Il génère un fichier txt au format compatible csv contenant NOM, SAMACCOUNTNAME et DESCRIPTION.
Pour les comptes utilisateurs et ordinateurs il reporte également le statut (Activé ou Désactivé) et la date de dernier login (LastLogonTimeStamp dans un domaine Windows 2003 ou supérieur).


Ce script nécessite une adaptation pour fonctionner dans votre environnement.
Pour celà, adaptez simplement les lignes suivantes et renseignez vos différents domaines.

Environnement = InputBox("Choisissez l'environnement (ROOT,child1,child2)", "Choix Environnement","CHILD1")
[...]
Select case LCASE(strEnvironnement)
case "root"
strDN = "dc=mondomaine,dc=local"
strfqdn = "mondomaine.local"
case "child1"
strDN = "dc=child1,dc=mondomaine,dc=local"
strfqdn = "child1.mondomaine.local"
case "child2"
strDN = "dc=child2,dc=mondomaine,dc=local"
strfqdn = "child2.mondomaine.local"
end select