Benutzer von einem anderen LDAP-Server auslesen und AD des eigenen Win.Server 2k8 via Script anlegen

Also ich hab folgende Aufgabe bzw folgendes Problem:

Es sollen Benutzeraccounts von einem anderen LDAP-Server ausgelesen werden und dann auf den eigenen Server implementiert werden.
Mit dem Account soll ein Benutzerprofil verknüpft werden. Angeblich solls mit einem VB Script am einfachsten gehn.
Ich habe da auch schon gute Ansetze gefunden aber da ich keine Ahnung von VB habe bräuchte ich etwas Hilfe ;)

Das wäre schonmal glaube ich die Prozedur Benutzer anzulegen

Dim fso, Zeile, Feld
Set fso = CreateObject("Scripting.FileSystemObject")  

Do while not f.AtEndOfLine
Zeile = f.readLine
Feld = split(Zeile,",")  
Benutzer = Feld(0)
Vorname = Feld(1)
Nachname = Feld(2)
Passwort = Feld(3)
Call BenuntzerAnlegen(Benutzer,Vorname,Nachname,Passwort)
Loop
f.Close
Wscript.Quit(0)


Sub BenuntzerAnlegen(Benutzer,Vorname,Nachname,Passwort)
Dim ouo, b
Set ouo = GetObject("LDAP://OU=OrganisationUnit,DC=DomainName,DC=TopLevelDomain")  
Set b = ouo.Create("user", "CN=" & Vorname & " " & Nachname)  
Dim WshShell, ret
Set WshShell = WScript.CreateObject("WScript.Shell")  
b.Put "sAMAccountName", Benutzer  
b.Put "displayName", Vorname & " " & Nachname  
b.Put "givenName", Vorname  
b.Put "sn", Nachname  
b.Put "userAccountControl", 66082  
b.Put "userPrincipalName", Benutzer & "@DomainName.TopLevelDomain"  
b.Put "profilePath", "\\Server\daten\profile\" & Benutzer  
b.Put "homeDirectory", "\\Server\daten\home\" & Benutzer  
b.Put "homeDrive", "H:"  
b.SetInfo
b.SetPassword Passwort
b.AccountDisabled = False
b.SetInfo
WScript.Sleep(1000)
ret = WshShell.Run ("verz.cmd " & Benutzer,0,1)  
End Sub

Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben

Content-ID: 98946

Url: https://administrator.de/contentid/98946

Ausgedruckt am: 25.11.2024 um 00:11 Uhr

2 Kommentare

Neuester Kommentar

Hallo,

also das Script was du gepostest hast liest ja aus einer Datei mit dem Schema

Anmeldename,Vorname,Nachname,Passwort

die Daten ein und erstellt daraus AD-Benutzer.

Dann könntest du doch leicht mit einer Scriptsprache deiner Wahl erstmal eine Datei nach diesem Schema vom anderen LDAP-Server exportieren und die dann mit dem Script einlesen lassen.