Re: Alle Benutzer einer Domäne incl. Unterconta...

www.IT-Visions.de-Diskussionsforen (Version 2.1)
(Diese Seite wurde noch nicht auf das neue Layout umgestellt!)

Diese Foren stehen den Lesern unserer Bücher und allen anderen registrieren Benutzern dieser Website zur Verfügung. Wir würden uns freuen, wenn viele Nutzer dieser Website hier nicht nur Fragen stellen, sondern auch die Fragen anderer Nutzer beantworten. Diese Foren sind ein ehrenamtlicher, nicht-kommerzieller, unmoderierter Community-Dienst von www.IT-Visions.de. Wenn Sie kommerzielle Unterstützung für .NET/Scripting/PowerShell suchen, schauen Sie bitte auf unser Support-Angebot und unsere Schulungsangebote für Scripting und Schulungsangebote für .NET.

Autor:	MichaelvanOyen
E-mail:	Antworten bitte nur in das Forum!
Datum:	09.11.2006 09:41:11
Subject:	Re: Alle Benutzer einer Domäne incl. Unterconta...
Bezug zum Buch:
Message:	Okay, nach ein wenig rumsuchen und testen, hab ich mir nun selbst etwas zusammen gebastelt. Das folgende Script liest alle User einer Domäne. Für jeden User tut es dann das, was unter der Sub DomaenToDo steht, in diesem Fall Ausgabe des CN-Namen: Set objConnection = CreateObject("ADODB.Connection") objConnection.Open "Provider=ADsDSOObject;" Set objCommand = CreateObject("ADODB.Command") objCommand.ActiveConnection = objConnection objCommand.CommandText = "<LDAP://ou=container,dc=containerdarüber, _dc=containernocheinhöher>;(objectCategory=user);distinguishedName,name;subtree" Set objRecordSet = objCommand.Execute While Not objRecordSet.EOF DomaenToDo() objRecordSet.MoveNext Wend objConnection.Close Sub DomaenToDo() strDomCN = objRecordSet.Fields("distinguishedName") wscript.echo strDOMCN End Sub

Antworten

Zurück zum Forum

Klassische Programmierung (Scripting, COM) -- Windows Scripting, VBScript, VB6, u.a.

Alle Benutzer einer Domäne incl. Untercontainer von MichaelvanOyen

am 19.10.2006 10:57:51 PM

Re: Alle Benutzer einer Domäne incl. Unterconta... von MichaelvanOyen

am 9.11.2006 9:41:11 AM