Joe_Boe

hallo

erstmal danke für eure Tipps,

mein Problem war aber, dass die Benutzernamen zu lange waren, deswegen hat er abgebrochen,

Hab jetzt nur Benutzernamen (Anmeldenamen) welche kleiner 20 Zeichen sind verwendet und schon lief das Skript,

Noch eine Frage anbei, kann man das irgendwie beseitigen, dass nur Anmeldenamen kleiner 20 Zeichen sein dürfen, oder is das fix wegen Win NT Mitgliedschaften

mfg

bernhard

hallo

mein Skript sieht so aus:

Dim fso, f, Zeile, Feld
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile ("user.txt",1,0)

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=Schueler,DC=meine-schule,DC=lcl")
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 & "@meine-schule.lcl"
b.Put "profilePath", "\\srv\daten\profile\" & Benutzer
b.Put "homeDirectory", "\\srv\daten\home\" & Benutzer
b.Put "homeDrive", "Z:"
b.Put "description" , "2007"
b.SetInfo                    '  // Zeile 33 
b.SetPassword Passwort
b.AccountDisabled = False
b.SetInfo
WScript.Sleep(1000)
ret = WshShell.Run ("verz.cmd " & Benutzer,0,1)
End Sub

Wenn ich jetzt ca. 3-6 Benutzer in der user.txt datei habe funktioniert das wunderbar, nur wenn so um die 20-30 Schüler (eine Klasse) in der user.txt stehen kommt immer nach 6-7 angelegten Benutzern folgende Fehlermeldung:

Skript C:\....\...\benutzerskript.vbs

Zeile: 33

Zeichen: 1

Fehler: Ein an das System angeschlossenes Gerät funktioniert nicht.

Code: 8007001F

Quelle (null)

Die Meldung kommt sowohl bei Server 2000 ( Wirkliches System in Schule) als auch bei Server 2003 (Testsystem in VMware).

Hat diese Fehlermeldung von euch auch jemand und weiß wer was das Problem ist??

Hab auch schon gegoogelt nur leider finde ich nichts brauchbares zu dieser Meldung.

mfg

Bernhard