Gibt es Hilfsprogramm zum anlegen von Benutzern
Hi @ all ;)
Ich suche zur Zeit nach einem Programm, welches mir die müheselige Arbeit ersparrt, jeden User einzeln aufzunehmen, bzw. anzulegen.
Vielleicht kennt jemand von Euch ein Prog. welches man hierfür benutzen kann. Am liebsten würde ich nämlich die Namen aller User in einer txt Datei aufnehmen. Diese wird dann von diesem Prog. aufgerufen, die Namen gelesen und anschließend werden die Benutzeraccounts automatisch angelegt.
Gruß Obstsalat
Ich suche zur Zeit nach einem Programm, welches mir die müheselige Arbeit ersparrt, jeden User einzeln aufzunehmen, bzw. anzulegen.
Vielleicht kennt jemand von Euch ein Prog. welches man hierfür benutzen kann. Am liebsten würde ich nämlich die Namen aller User in einer txt Datei aufnehmen. Diese wird dann von diesem Prog. aufgerufen, die Namen gelesen und anschließend werden die Benutzeraccounts automatisch angelegt.
Gruß Obstsalat
Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 8691
Url: https://administrator.de/contentid/8691
Ausgedruckt am: 23.11.2024 um 00:11 Uhr
2 Kommentare
Neuester Kommentar
Hallo Obstsalat,,
hier eine Scriptvorlage wie es realisierbar ist.
Ist natürlich mit den entsprechenden Attributen beliebig anpassbar, und es könnte als input file ein textfile genommen werden.
mehr dazu unter
http://www.microsoft.com/technet/scriptcenter/scripts/ad/users/manage/d ...
Gruß
Egbert
Set objRootDSE = GetObject("LDAP:rootDSE")
Set objContainer = GetObject("LDAP:cn=Users," & _
objRootDSE.Get("defaultNamingContext"))
For i = 1 To 1000
Set objLeaf = objContainer.Create("User", "cn=UserNo" & i)
objLeaf.Put "sAMAccountName", "UserNo" & i
objLeaf.SetInfo
Next
WScript.Echo "1000 Users created."
hier eine Scriptvorlage wie es realisierbar ist.
Ist natürlich mit den entsprechenden Attributen beliebig anpassbar, und es könnte als input file ein textfile genommen werden.
mehr dazu unter
http://www.microsoft.com/technet/scriptcenter/scripts/ad/users/manage/d ...
Gruß
Egbert
Set objRootDSE = GetObject("LDAP:rootDSE")
Set objContainer = GetObject("LDAP:cn=Users," & _
objRootDSE.Get("defaultNamingContext"))
For i = 1 To 1000
Set objLeaf = objContainer.Create("User", "cn=UserNo" & i)
objLeaf.Put "sAMAccountName", "UserNo" & i
objLeaf.SetInfo
Next
WScript.Echo "1000 Users created."