Anlegen eines User-Objekts im Active Directory
Autor: Dr. Holger Schwichtenberg
' ============================' .NET-Code-Beispiel in Visual Basic .NET' Anlegen eines User-Objekts im Active Directory' (C) Holger@Schwichtenberg.de' ============================Sub ADSBenutzeranlegen() Dim o As DirectoryEntry Dim c As DirectoryEntries out("# Anlegen des Benutzerkontos: " & USER) ' --- Zugriff auf IADS o = New DirectoryEntry(LDAPbasta, _ ADMINUSER, ADMINPASSWORD) ' --- Zugriff auf IADSContainer c = o.Children() ' --- Neues Objekt erzeugen o = c.Add(USER, "user") ' --- Verzeichnisattribute festlegen o.Properties("SAMAccountName").Add("HSch") o.Properties("l").Add("Essen-Byfang") o.CommitChanges() ' --- Konto aktivieren o.NativeObject.AccountDisabled = False o.CommitChanges()End Sub
using System;using System.DirectoryServices;using ActiveDs;namespace FCLBuch._SystemDirectoryServices { public class Samples_ADSI {public void ADSBenutzeranlegen() { // Anlegen eines User-Objects im Active Directory FclOutput.PrintOut("# Anlegen des Benutzerkontos: " + USER); // Zugriff auf IADS DirectoryEntry o = new DirectoryEntry(LDAPbasta, ADMINUSER, ADMINPASSWORD); // Zugriff auf IADSContainer DirectoryEntries c = o.Children; // Neues Objekt erzeugen o = c.Add(USER, "user"); // Verzeichnisattribute festlegen o.Properties["sAMAccountName"].Add("HSch"); o.Properties["l"].Add("Essen-Byfang"); o.CommitChanges(); // Konto aktivieren# ((ActiveDs.IADsUser)(o.NativeObject)).AccountDisabled = false; o.CommitChanges(); }}}
Definition '.NET Framework Class Library' Verfügbarkeit der Klasse 'System.DirectoryServices.DirectoryEntry' Übersicht über den FCL-Namensraum 'System.DirectoryServices' .NET & Visual Studio Community Portal