Jump to content

Gladiator

Members
  • Gesamte Inhalte

    17
  • Registriert seit

  • Letzter Besuch

Beiträge erstellt von Gladiator

  1. Hey Leute,

     

    mein Problem ist folgendes:

     

    Ich habe eine OU Lehrer & eine OU Schüler.

     

    Ich möchte das bis auf zwei Verknüpfungen die Benutzeroberfläche (Terminalserver) gleich ist. Funktioniert auch, aber die beiden Verknüpfungen für OU Lehrer kann ich nicht erstellen! Das sollte doch eigentlich über Gruppenrichtlinien gehen, oder?

     

    Habe W2K Server & W2K Client. Wäre ein LogonScript besser, das mir die Verküpfungen immer aktualisiert, bzw. nach dem Löschen wieder herstellt? Wenn ja, wie sollte dieses Script aussehen?

     

    Danke schon mal für eure Antworten.

     

    mfg

    Gladiator

  2. Hey Leute,

     

    Sorry, war die letzten Tage nicht da.

     

    Es sollen Beutzer sein, mit eingeschränkten Rechten (kein Vollzugriff).

    Ich will das der Benutzer sich Lokal anmelden kann. Mit Internetzugang, und Zugriff auf ein Netzlaufwerk, und in den Benutzerprofilen soll er Dateien abspeichern können, mit Kontingentverwaltung.

    Meine Domäne heißt EDV & meine TLD heißt local. Ich hab die Konten auf EDV.local gesetzt.

     

    Ich hab die User zur Gruppe der Benutzer hinzugefügt. Irgendetwas mache ich falsch, bloß ich komm nicht drauf was?

     

    Wißt ihr Rat?

     

    mfg

    Gladiator

  3. Hey,

     

    danke für den Tipp, hab einiges gefunden, klasse.

     

    Nur.....

     

    rundll32 printui.dll,PrintUIEntry /n /in /c \\Server\Comp.-Raum 1

     

    wenn ich es so eingebe, bekomme ich als Antwort: Vorgang kann nicht abgeschlossen werden, oder Drucker nicht verfügbar.

    Obwohl er dranhängt, hab sogar versucht ihn über die IP Adresse anzusprechen, aber das macht er auch nicht, kommt zwar keine Fehlermeldung aber das wars auch schon.

     

    So müßte es doch eigentlich richtig sein. Weißt du, an was es liegen könnte?

     

    mfg

    Gladiator

  4. Hallo Leute,

     

    bin gerade dabei 26 Laptops neu zu installieren. Jetzt will ich nicht immer denn Assistenten für Druckerinstallation verwenden, um einen Netzwerkdrucker zu installieren.

     

    Wie kann ich dieses Problem über eine Batchdatei lösen? Habt ihr irgendwelche Vorschläge. Hab hier im Forum schon gesucht, aber nix gefunden, was mir weiterhelfen könnte.

     

    MFG

    Gladiator

  5. GESCHAFFT!!!!

     

    Funktioniert. Jetzt hab ich nur noch ein Problem: Wenn ich mich mit einem erstellten Benutzernamen anmelden will bekomme ich folgende Meldung: Ihre Richtlinien erlauben es Ihnen nicht sich interaktiv anzumelden!

     

    Schon mal gehört? Ist mir ehrlich gesagt neu.

     

    Kannst du mir da noch mal helfen?

     

    Danke schon mal.

     

    mfg

    Gladiator

  6. Ich hab jetzt die Verz.cmd probiert, funzt aber net richtig.

     

    Ich hab mein Homeverzeichnis & meine Benutzerprofile auf dem Server im Stammverzeichnis von D: liegen. Schau dir bitte mal an was ich da falsch mache, auch in der vbs Datei. Vielleicht denke ich auch zu kompliziert:

     

    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=Schüler,DC=EDV,DC=local")

    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 & "@EDV.local"

    b.Put "profilePath", "\\Server\Benutzerprofile\" & Benutzer

    b.Put "homeDirectory", "\\Server\Home\" & Benutzer

    b.Put "homeDrive", "D:"

    b.SetInfo

    b.SetPassword Passwort

    b.AccountDisabled = False

    b.SetInfo

    WScript.Sleep(1000)

    ret = WshShell.Run ("verz.cmd " & Benutzer,0,1)

    End Sub

     

    Verz.cmd:

     

    md \\Server\Home\%1

    echo J | cacls \\server\Home\%1 /C /E /G Administratoren:F

    echo J | cacls \\server\Home\%1 /C /E /G EDV\%1:F

    echo J | cacls \\server\Home\%1 /C /E /R Jeder

    md \\SERVER\Benutzerprofile\%1

    echo J | cacls \\server\Benutzerprofile\%1 /C /E /G Administratoren:F

    echo J | cacls \\server\Benutzerprofile\%1 /C /E /G EDV\%1:F

    echo J | cacls \\server\Benutzerprofile\%1 /C /E /R Jeder

     

    Danke schon mal im voraus.

  7. Guten Morgen,

     

    die Idee war gut, aber leider wars das nicht.

     

    Meine Domain ist EDV.local, meine TopLevelDomain müßte dann EDV sein.

     

    Wenn ich es nach deinem Vorschlag mache, bekomme ich diese Meldung: Object ist auf dem Server nicht vorhanden. Dein Gedankengang war richtig, aber hat nichts gebracht, leider.

    Ich hab das Script so nochmal im Internet gefunden, hat wohl mein Arbeitskollege heruntergeladen, und mir gegeben, ich poste mal das Original, vielleicht hilfts weiter.

     

     

    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=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

  8. Guten Morgen Leute,

     

    Jetzt bringt er mir die Fehlermeldung:

    Zeile 19

    Zeichen 1

    Eine Referenzauswertung wurde vom Server zurückgesendet.

    Code 8007202B

    Quelle (null)

     

    Ich hab jetzt folgendes VBScript erstellt, könntet ihr mir vielleicht sagen, was daran falsch ist? Der Benutzername, und das Benutzerkonto werden aus einer Textdatei ausgelesen.

     

    Ralphs Vorschlag war schon Klasse, aber so wäre es noch ein wenig besser. Ich poste hier mal den Quelltext:

    Danke schon mal, Leute.

     

    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=Benutzerprofile,DC=EDV.local,DC=EDV")

    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 & "@EDV.EDV.local"

    b.Put "profilePath", "\\Server\Benutzerprofile\" & Benutzer

    b.Put "homeDirectory", "\\Server\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

  9. Hey Leute,

     

    zuerst einmal Hallo, ich bin neu im Forum.

     

    Jetzt hab ich auch schon ein Problem. Ich will 400 Benutzer anlegen auf einem Server anlegen (Windows 2000 Server). Meine Clients sind W2K.

    Jeder Benutzer soll einen Ordner auf dem Server zur Verfügung gestellt bekommen auf den nur er und der Administrator Zugriff hat.

    Dieser Ordner soll bei der Anmeldung am Client automatisch als Netzlaufwerk eingebunden werden. Der Benutzer soll ebenfalls sein persönliches Windows-Profil vom Server beziehen. Außerdem will ich ein Netzlaufwerk und einen Netzwerkdrucker anlegen lassen.

     

    mfg

    Gladiator

×
×
  • Neu erstellen...