Accueil de Gladir.com Notes légales de Gladir.com Flux RSS des nouvelles du site Gladir.com - Serveur ou service logiciel - Active Directory - Introduction Section du logiciel DOS «MonsterBook» Inventaire de la bibliothèque de Gladir.com Entrée administrateur


Introduction

L'Active Directory est un service d'annuaire LDAP pour les systèmes d'exploitation Windows Server (Windows 2000 Server, Windows 2003 Server, Windows 2008 Server, Windows 2012 Server,...)..

La concurrence

Les concurrents le plus sérieux sont OpenLDAP ou une combinaison de NFSv4, Kerberos et LDAP.

Pour et contre

Voici quelqu'uns des avantages de ce serveur :

  • Très facile d'utilisation.
  • Possibilité de gérer plus efficacement les rôles et les groupes utilisateurs.
  • Ce service s'intègre bien avec les différents produit de la famille Microsoft Dynamics, Microsoft Exchange ou Axapta (X++).

Voici les désavantages de ce serveur :

  • Nécessite un système d'exploitation Windows.

Programmation

L'utilisation dans un programme C# est somme tout assez simple, il suffit d'inclure dans la référence de Visual Studio «System.DirectoryServices.dll», et d'ensuite inclure l'espace de nom sous la forme «using System.DirectoryServices;». Ensuite, on peut l'utiliser par exemple à l'aide de la classe DirectoryEntry pour se connecter de la façon suivante : «DirectoryEntry LDAP = new DirectoryEntry("LDAP://nomactivedirectory", "utilisateur", "motdepasse");». Il est également possible d'utiliser la même technique si vous l'utilisez à l'aide de Delphi for .NET ou VB .NET. Voici un aperçu du genre de code que l'on aura en Delphi for .NET :

  1. Try
  2.   entry:=DirectoryEntry.Create('LDAP://gladir.dev','\' + TextBox1.Text,TextBox2.Text);
  3.   search:=DirectorySearcher.Create(entry);
  4.   search.Filter := '(SAMAccountName=' + TextBox1.Text + ')';
  5.   search.PropertiesToLoad.Add('cn');
  6.   if(search.FindOne <> NIL)Then Begin
  7.   Session.Item['UserID'] := TextBox1.Text;
  8.    Server.Transfer('WebForm1.aspx');
  9.   End;
  10. Except
  11.    on E: Exception do Label4.Text:=E.Message;
  12. End;


Dernière mise à jour: Mercredi, le 23 mai 2012