Jump to content

Gladiator

Members
  • Gesamte Inhalte

    17
  • Registriert seit

  • Letzter Besuch

Profile Fields

  • Member Title
    Newbie

Fortschritt von Gladiator

Explorer

Explorer (4/14)

  • Erste Antwort
  • Engagiert
  • Erster eigener Beitrag
  • Eine Woche dabei
  • Einen Monat dabei

Neueste Abzeichen

10

Reputation in der Community

  1. Hallo, hab ich mir auch schon überlegt, aber ich bin mir nicht sicher ob das so funzt, wie ich es mir vorstelle, denn die Gruppenrichtlinie muß ich deswegen auch benutzen, oder liege ich völlig falsch? mfg Gladiator
  2. 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
  3. Wie kann ich das mit einem LogonScript bewerkstelligen?? Hab das gleiche Problem. Danke für eure Antwort
  4. Hey Ralle, für \\Computer - gehört hier der Computername, oder der Server? Normal beim ersten der Server, und beim zweiten Mal der Computer selber, oder täusche ich mich da? mfg Gladiator
  5. 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
  6. Funzt auch net. Muß ich nicht eigentlich den Comuter angeben mit dem der Drucker verbunden werden soll? Von der logik eigentlich schon, oder? Also den Server\Comp.-Raum 1 \Computername?? mfg Gladiator
  7. 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
  8. 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
  9. 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
  10. 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.
  11. Der Inhalt sollte einen Ordner erstellen: md /L echo J | cacls /C /E /G Administratoren:F echo J | cacls /C /E /G EDV.local echo J | cacls /C /E /R Jeder md echo J | cacls /C /E /G Administratoren:F echo J | cacls /C /E /G EDV.local echo J | cacls /C /E /R Jeder
  12. Hey, KLASSE hat funktioniert . Super. Eine Frage zum Abschluss: Er legt mir keinen neuen Ordner in Benutzerprofile & Home an, bringt aber auch keine Fehlermeldung. Die Benutzer werden normal in der OU im AD angelegt.
  13. 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
  14. 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
  15. Hey, hab dein script ausprobiert, bekomme aber die Meldung: Referenzauswertung wurde vom server zurückgesendet. Was kann das sein?? mfg Gladiator
×
×
  • Neu erstellen...