Re: Benutzer via Script anlegen

[Olaf Engelke [MVP Windows Server]]

Hallo Thomas,
Thomas wrote:
> Hi ich möchte knapp 400 User via Script in einer NT-Domaine anlegen
> was muss ich von dem Script für den 2003 Server ändern damit es
> funktioniert?
>
da wir nicht hellseherisch begabt sind, ist es uns auch nicht moeglich, den
Inhalt Deines Windows Server 2003Scripts zu ermitteln.

Wenn Du eine Liste der Benutzer hast, kannst Du mit Excel und ein paar dort
erfassten Daten ein paar Batchdateien basteln, die pro Zeile pro Benutzer
bestimmte Aufgaben ausfuehren, beispielsweise Benutzer anlegen:

net use u: \\server\home$
(vorher ausfuehren, falls von einem anderen Rechner als dem Server mit den
Homedrives initiiert)

Batch 1 (Homeverzeichnis anlegen)
md u:\username
Batch 2 (Homeverzeichnis freigeben - lokal auch mit net share moeglich)
rmtshare \\server\username$=d:\home\username
Batch 3 (Account erzuegen)
net user username /DOMAIN /ADD "" /FULLNAME:"Nachname, Vorname"
/Homedir:\\server\username$
Batch 4 (Informationen ergaenzen)
net user username /scriptpath:xyz.bat /passwordreq:yes /comment:"Team01 -
999" /DOMAIN
Batch 5 (Gruppe setzen)
net group Team01 username /domain /add
Batch 6 (Rechte Homeverzeichnis setzen)
xcacls u:\username /G Administrators:F berlecni:C /Y

Fuer einige der Zeilen ist eine Ausgabeumleitung in eine Textdatei
empfehlenswert, damit Fehler schneller ins Auge fallen.
Viele Gruesse
Olaf

[Thomas]

Hallo Olaf,

danke für die Antwort.

> da wir nicht hellseherisch begabt sind, ist es uns auch nicht moeglich, den
> Inhalt Deines Windows Server 2003Scripts zu ermitteln.

Ich verwende ein VB-Script um eine CSV-Datei auszulesen Nach dem die User
dann im Ad Angelegt sind öffne ich ein eBatch Datei mit der ich die Home und
Profile Ordner Benutzerspezifisch anlege.

Meine Frage bezog sich auf das VB-Script da ich bei WInNT keine LDAP
Schnittstelle habe wüsste ich gerne wie ich die Zeilen ändern muss

Hier mal kurz mein vbScript:

Sub BenuntzerAnlegen(Benutzer,Vorname,Nachname,Passwort,Kuerzel)
Dim ouo, b
Set ouo = GetObject("LDAP://DC=privat ,DC=intern")
Set b = ouo.Create("user", "CN=" & Vorname & " " & Nachname)
Dim WshShell, ret
Set WshShell = WScript.CreateObject("WScript.Shell")
b.Put "sAMAccountName", Benutzer 'Benutzername
b.Put "displayName", Vorname & " " & Nachname
b.Put "givenName", Vorname
b.Put "sn", Nachname
b.Put "initials", Kuerzel
b.Put "userPrincipalName", Benutzer & "@privat.intern"
b.Put "profilePath", "\\srv01\profile$\" & Benutzer
b.Put "homeDirectory", "\\srv01\home$\" & Benutzer & "\Desktop"
b.Put "homeDrive", "H:"Home gemappt wird
b.SetInfo
WScript.Sleep(5000) 'setzt das Script für 5000msec
ret = WshShell.Run ("verz_intern.cmd " & Benutzer,1)
End Sub

Ich hoffe das es nun eindeutiger ist und vielleicht ist die Lösung für das
VB-Script genau so leicht wie für die Batchdatei,oder kann ich das Kommando
von der Batch einfach ins VB-Script setzten

Gruss

Thomas

[Olaf Engelke [MVP Windows Server]]

Hallo Thomas,

schau mal hier:
http://www.rlmueller.net/WinNT_Binding.htm
und hier.
Diese beiden Seiten (mit vielen praktischen Beispielen) sollten Dir
eigentlich weiterhelfen.
Viel Erfolg
Olaf