Viele Benutzer per Script anlegen

[woiza 10]

Gibt es vielleicht doppelte Benutzernamen?

[blub 115]

also

GetObject("LDAP://<ldapserver>:389/OU=Schueler,DC=meine-schule,DC=lcl

 

dann dürfte das Problem weg sein

 

cu

blub

[Joe_Boe 10]

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

[woiza 10]

Bestätigt

[mehrlich 10]

Hallo Forum,

 

ich habe natürlich auch dieses Geniale Script gezogen nur bekomme ich immer einen Laufzeitfehler: b.SetInfo (Objekt bereits vorhanden) Ich erstehe das nicht.

 

Könnt ihr mir schnell helfen???

[Kristian007 10]

Hallo an alle, ich habe mit Begeisterung den Beitrag gelesen und teile vom Script für meine Zwecke kopiert. Leider klappt das ganze nicht so wie ich will, vielleicht kann mir jemand helfen.

Es geht darum das ich von einer x Anzahl von Usern die in einem txt File stehen den TerminalServicesHomeDirectory ausgelesen haben möchte und das ganze soll wieder in einer txt ausgegeben werden.

 

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,",")

Vorname = Feld(0)

Nachname = Feld(1)

 

Call BenuntzerAuslesen(Vorname,Nachname)

Loop

f.Close

Wscript.Quit(0)

 

Sub BenuntzerAuslesen(Vorname,Nachname)

Dim ouo, b

 

Set objUser = GetObject _

("LDAP://cn=" & Vorname & " " & Nachname",ou=MIS_User,ou=MIS,ou=Citrix_User,dc=Dump,dc=local")

 

strTerminalServicesProfilePath = objUser.TerminalServicesProfilePath

strTerminalServicesHomeDirectory = objUser.TerminalServicesHomeDirectory

strTerminalServicesHomeDrive = objUser.TerminalServicesHomeDrive

intAllowLogon = objUser.AllowLogon

 

WScript.echo "TerminalServicesProfilePath : " & strTerminalServicesProfilePath

WScript.echo "TerminalServicesHomeDirectory: " & _

strTerminalServicesHomeDirectory

 

 

Für den Export in eine txt habe ich überhaupt keine Idee. Kann mir jemand da helfen ?

Mir würde auch eine normal einfach LDAP Abfrage auch reichen die ich im AD unter Custom Search.

 

Danke euch schonmal vorab

Gruß

[woiza 10]

Hallo Forum,

 

ich habe natürlich auch dieses Geniale Script gezogen nur bekomme ich immer einen Laufzeitfehler: b.SetInfo (Objekt bereits vorhanden) Ich erstehe das nicht.

 

Könnt ihr mir schnell helfen???

 

Kannst du das verwendete Skript und die Textdatei posten?

[woiza 10]

Dim fso, f, Zeile, Feld

Set fso = CreateObject("Scripting.FileSystemObject")

Set f = fso.OpenTextFile ("user.txt",1,0)

 

An dieser Stelle eine weitere Textdatei öffnen

 

Do while not f.AtEndOfLine

Zeile = f.readLine

Feld = split(Zeile,",")

Vorname = Feld(0)

Nachname = Feld(1)

 

Call BenuntzerAuslesen(Vorname,Nachname)

Loop

f.Close

 

zweites Textfile schließen

 

Wscript.Quit(0)

 

Sub BenuntzerAuslesen(Vorname,Nachname)

Dim ouo, b

 

Set objUser = GetObject _

("LDAP://cn=" & Vorname & " " & Nachname",ou=MIS_User,ou=MIS,ou=Citrix_User,dc=Dump,dc=local")

 

strTerminalServicesProfilePath = objUser.TerminalServicesProfilePath

strTerminalServicesHomeDirectory = objUser.TerminalServicesHomeDirectory

strTerminalServicesHomeDrive = objUser.TerminalServicesHomeDrive

intAllowLogon = objUser.AllowLogon

 

statt wscript.echo file.WriteLine verwenden

 

WScript.echo "TerminalServicesProfilePath : " & strTerminalServicesProfilePath

WScript.echo "TerminalServicesHomeDirectory: " & _

strTerminalServicesHomeDirectory

 

 

Die genaue Syntax gibts hier. Wen du damit nicht klarkommst, nochmal melden.

[mehrlich 10]

Moin,

also der Fehler ist weg warum auch immer. Es tat sich aber ein Neues Problem auf, ich möchte den Benutzern gerne noch eine oder mehrere Gruppen zuweisen.

 

Wenn ich im GetObject("LDAP://OU=Benutzer,OU=Standort1,DC=testdom,DC=local") angebe, bekomme ich immer Fehler. Ich hatta mir das so gedacht das ich in meiner OU noch ein paar Unter OU's habe in die seperiert BEnutzer angelegt werden. Dieses würde ich fer Einfachhalt halber auch gerne in meine user.txt mit reinschraiben das die Benutzer Automatisch in die OU's angelegt werden.

 

 

Außer dem muß ich noch in einem EXTRA Script, in jedem Homeordener der Benutzer einen Ordner kopieren. Das heißt, Beispiel: in D:\Daten\homedirs\ liegen ca. 100 Unterordner (Home Laufwerke) in jedem von denen möchte ich per Script ein und den Selben Ordner kopieren. Nur weiß ich nicht wie das Script aussehen muß.

 

 

Gruß,

Martin

[woiza 10]

Moin,

also der Fehler ist weg warum auch immer. Es tat sich aber ein Neues Problem auf, ich möchte den Benutzern gerne noch eine oder mehrere Gruppen zuweisen.

 

Hier gibts ne Anleitung zu Gruppen.

 

Wenn ich im GetObject("LDAP://OU=Benutzer,OU=Standort1,DC=testdom,DC=local") angebe, bekomme ich immer Fehler.

 

Welchen? Ist die OU schon vorhanden?

 

Ich hatta mir das so gedacht das ich in meiner OU noch ein paar Unter OU's habe in die seperiert BEnutzer angelegt werden. Dieses würde ich fer Einfachhalt halber auch gerne in meine user.txt mit reinschraiben das die Benutzer Automatisch in die OU's angelegt werden.

 

Ja, geht doch, dann machst du halt noch ein Feld für die OU in der Text.

 

Außer dem muß ich noch in einem EXTRA Script, in jedem Homeordener der Benutzer einen Ordner kopieren. Das heißt, Beispiel: in D:\Daten\homedirs\ liegen ca. 100 Unterordner (Home Laufwerke) in jedem von denen möchte ich per Script ein und den Selben Ordner kopieren. Nur weiß ich nicht wie das Script aussehen muß.

 

Gruß,

Martin

 

Dafür würd ich nen neuen Post aufmachen, das hat mit dem thema wenig zu tun.

 

Gruß

 

woiza

[mehrlich 10]

Mit er Anleitung komme ich nicht so wirklich klar aber isch schaue mal.

 

Ja die OU's sind schon vorhanden ich hatte das dann so deklariert OU=Benutzer,OU=Standort1,DC... nur leider sagte er das dieses nicht funktoniert

[woiza 10]

Und ist Benutzer eine Unter-OU von Standort1?

[mehrlich 10]

Nein genau umgedreht, Standort1 ist eine UnterOU con Benutzer.

 

Kannst Du mir auch Helfen was die Gruppenzuordnung bei den Benutzern angeht?

 

Ich hatte schon mal die Sachen eingetragen die ein paar threads vorher standen nur leider bekamen alle die gleiceh Gruppe zu gewiesen, die der erste eintrag in der user.txt hatte. Und ich bekam eine Fehlermeldung für den eintrag Usergroup = Feld(4). Es kam die Meldung [4] kann nicht zugeordnet werden oder sowas.

[woiza 10]

Dann ist die Reihfolge falsch. Von links nach rechts im LDAP-Pfad ist von unten nach oben in der AD-Hierarchie.

 

Für die Gruppen solltest du schon das verwendete Skript und das File posten, sonst ist das etwas wie Stochern im Nebel.

[sysiphos 10]

Hallo,

auf die Gefahr hin das es bereits vorgeschlagen wurde, ich hab jetzt nicht wirklich Lust 17 Seiten zu lesen :D , schau dir das Tool mal an, vielleicht hilft es dir.

Hier zum Link Les dir das mal durch damit du siehst was du mit dem Tool alles machen kannst.

Hier zum Download

 

Gruß

Enzo