Bäumchen

abend ich habe zwar nicht ganz so viel plan von VBScript aber naja ich versuchs mal *g* b.SetInfo <--damit werden die einstellungen gesetzt, dh nach den TS-einstellungen muss das auch hin ich hoffe es geht jetzt :) mfg norbert gn8

hallo danke schon mal werde es morgen testen! was bdeutet hier "member" mfg bäumchen

Hallo Pro's und Scripter bitte mir helfen..... es ist wichtig, vorallem weils morgen fertsch sein muss und gehen mfg Bäumchen

hallo, ich habe mir die 10 seiten durch gelesen und auch den SUPER-SCRIPT genommen und versucht anzupassen *g* aber die Gruppen zuweißung klappt leider nicht :( kann mir einer helfen?? also es geht alles, wie gesagt nur bis auf die die schüler in die gruppe schueler zu packen -----user.txt----- user1,vor1,nach2,pwd,Stufe_A,schueler user2,vor2,nach2,pwd,Stufe_B,schueler ----ende user.txt----- ----vbscript.vbs---- 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) Stufe = Feld(4) GroupObj = Feld(5) Call BenuntzerAnlegen(Benutzer,Vorname,Nachname,Passwort,Stufe,GroupObj) Loop f.Close Wscript.Quit(0) Sub BenuntzerAnlegen (Benutzer,Vorname,Nachname,Passwort,Stufe,GroupObj) Dim ouo, b Set ouo = GetObject("LDAP://ou=" & Stufe & ",ou=schueler,dc=testschule2,dc=SON,dc=stadt,dc=de") Set b = ouo.Create("user", "CN=" & Vorname & " " & Nachname) Dim WshShell, ret Set WshShell = WScript.CreateObject("WScript.Shell") b.Put "sAMAccountName", Benutzer b.Put "userPrincipalName", Benutzer & "@testschule2.son.stadt.de" 'b.Put "profilePath", "\\kserver\daten\profile\" & Benutzer b.Put "homeDirectory", "\\kserver\home$\" & Stufe & "\" & Benutzer b.Put "homeDrive", "H:" b.put "memberOf", "cn=Schueler,ou=Gruppen,ou=unterricht,DC=testschule2,DC=SON,DC=stadt,DC=de" b.SetInfo b.SetPassword Passwort b.AccountDisabled = False b.SetInfo WScript.Sleep(1000) ret = WshShell.Run ("verz.cmd " & Benutzer,0,1) 'Die Gruppe wird gesucht und als Ziel definiert. Set GroupObj = GetObject("LDAP://kserver.testschule2.SON.stadt.de/CN=" & Benutzer & ",OU=" & Stufe & ",ou=SCHUELER,DC=testschule2,DC=SON,DC=stadt,DC=de") 'Der User wird in die entsprechende Gruppe integriert. GroupObj.Add (""&"WinNT://kserver/" & Benutzer & "") Set DomainObj = Nothing ' Variable wird frei gegeben ' Set GroupObj = Nothing ' Variable wird frei gegeben ' End Sub ----ende vbscript.vbs----- ----verz.cmd---- md \\kserver\home$\schueler\%1\%2 echo J | cacls \\kserver\home$\schueler\%1\%2 /C /E /G Administratoren:F echo J | cacls \\kserver\home$\schueler\%1\%2 /C /E /G domaene\%2:F ----ende verz.cmd---- ich hoffe ihr könnt mir helfen mfg Bäumchen