AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Projekte AdsScripter-Erstellen von VB Scripten für Domänen-Admins
Thema durchsuchen
Ansicht
Themen-Optionen

AdsScripter-Erstellen von VB Scripten für Domänen-Admins

Ein Thema von jensw_2000 · begonnen am 19. Aug 2005 · letzter Beitrag vom 19. Jan 2011
Antwort Antwort
jensw_2000
Ich möchte Euch ein kleines Freeware-Projekt vorstellen, das ich primär zur Erleichterung meiner eigenen täglichen Arbeit entwickelt habe.

Wer kennt das nicht ..
neuer Kunde, Active Directory, 50 neue User mit komischen Namen müssen (Chinesen oder so..) angelegt werden
> Eintippen ist aufwendig, Script schreiben nervtötend

In der Vergangenheit habe ich damit immer den Azubi beschäftigt, oder habe mit diversen Script-Erstellungs-Experimenten mehr Zeit verbraucht, als ich zum Anlegen der User benötigt hätte.

Jetzt dauert das Anlegen von 80 Usern etwa 10 Minuten, wonvon man etwa 8 Minuten Zeit für eine Kaffepause hat, während das VB-Script läuft.

Das AdsScripter kann Benutzer aus Excel einlesen, erstellt ein VB-Script, das die User erzeugt und diese in bis zu 4 wahlfreie Gruppen (pro Benutzer) steckt. Dabei kann man pro Benutzer festlegen, in welchem ADS Container das Benutzerkonto erstellt wird.

Gruppen und OU's die nicht existieren werden automatich mit erstellt.

Zusätzlich werden Homedirectories und Profilverzeichnisse erstellt und die notwendigen Zugriffsrechte vergeben.

Das ist der Stand heute.

Ich habe das Programm Plugin-fähig gestaltet und werde es nach und nach mit zusätzlichen Scripten erweitern.
Mit schwebt da z.B. vor - Kennwörter aller Benutzer zurücksetzen
- OU Struktur erstellen usw.

Wer Interesse hat kann es sich ja mal anschauen.
Aus meiner alten MCSE-Kurs-Truppe setzen inzwischen fast alle das Tool ein.

Hier der Download Link AdsScripter_latest.zip (etwa 4,4 MB)


Schöne Grüße,
Jens

Angehängte Dateien
Dateityp: zip screenshots_577.zip (687,2 KB, 49x aufgerufen)
 
jensw_2000
 
#2
  Alt 24. Aug 2005, 09:37
Die aktuelle Version und ein weiteres Scriptbuilder-Plugin sind verfügbar.

Änderungen (Hauptprogramm):
- einen Fehler in der Pluginscjnittstelle korrigiert
- div. Tippfehler beseitigt

Funktionen / Änderungen (Plugin-CreateUser.ads):
- kann Benutzerdaten aus Excel einlesen
- erstellt ein VB-Script, das die User im Active Directory erzeugt
- jeder User kann in zu 4 individuelle Gruppen gesteckt werden
- Gruppen werden erstellt falls nicht vorhanden
- kann optional eine OU angegeben werden, in der neu erstellte Gruppen erstellt werden
- pro Benutzer festgelegt werden, in welchem ADS Container das Benutzerkonto erstellt wird
- nicht vorhandene OU's werden durch das Script erstellt
- Homedirectories und Profilverzeichnisse können durch das Script erstellt und mit
den notwendigen Zugriffsrechten versehen werden
- ein Anmeldescript kann definiert werden
- dem Anmeldescript können Parameter übergeben werden
- es kann definiert werden, wie die Konten erstellt werden
(aktiviert/deaktiviert, Benutzer muss Kennwort beim Ersten anmelden änern oder nicht)


Neues AdsScripter Plugin (PasswordTools.ads):

- unterscheiden ob bei dem AD-User das Flag "Kennwort läuft nie ab" gesetzt
ist oder nicht, und nur die User verändern, bei denen das Flag nicht gesetzt
ist (somit fasst das Script keine Dienst- und Funktionskonten an
und ändert auch nichts beim Admin ..)

- alle ADS Benutzer beim nächsten Login zum Ändern des Passwortes zwingen
(ausser mit Flag "Kennwort läuft nie ab")

- einzelne ADS Benutzer beim nächsten Login zum Ändern des Passwortes zwingen
(ausser mit Flag "Kennwort läuft nie ab")

- alle ADS Benutzern ein neues Kennwort verpassen und optional zum Ändern des
Passwortes zwingen (ausser mit Flag "Kennwort läuft nie ab")

- einzelnen ADS Benutzer ein neues Kennwort verpassen und optional zum Ändern des
Passwortes zwingen (ausser mit Flag "Kennwort läuft nie ab")

- Kontosterrungen für alle, bzw. einen bestimmten User zurücksetzen
(ausser mit Flag "Kennwort läuft nie ab")
  Mit Zitat antworten Zitat
jensw_2000
 
#3
  Alt 17. Mai 2006, 22:54
Hallo Leute,

für meinen AdsScripter ist ein neues Update verfügbar.

Änderungen (Hauptprogramm):
- NEU: das Programm läuft jetzt auch bei einer Auflösung kleiner 1024x768 sauber
- NEU: bei einer zu kleinen Auflösung kann das Programm mit Scrollbalken trotzdem noch verwendet werden

Funktionen / Änderungen (Plugin "CreateUser.ads"): - kann Benutzerdaten aus Excel einlesen
- erstellt ein VB-Script, das die User im Active Directory erzeugt
- jeder User kann in zu 4 individuelle Gruppen gesteckt werden
- Gruppen werden erstellt falls nicht vorhanden
- kann optional eine OU angegeben werden, in der neu erstellte Gruppen erstellt werden
- pro Benutzer festgelegt werden, in welchem ADS Container das Benutzerkonto erstellt wird
- nicht vorhandene OU's werden durch das Script erstellt
- Homedirectories und Profilverzeichnisse können durch das Script erstellt und mit
den notwendigen Zugriffsrechten versehen werden
- ein Anmeldescript kann definiert werden
- dem Anmeldescript können Parameter übergeben werden
- es kann definiert werden, wie die Konten erstellt werden
(aktiviert/deaktiviert, Benutzer muss Kennwort beim Ersten anmelden änern oder nicht)
- NEU: obligarorische Profile werden unterstützt. Diese können durch den Admin angepasst und verbindlich zugewiesen werden (mandatory Profiles)
- NEU: obligarorische Terminalserver-Profile werden unterstützt
- NEU: Der Benutzername wird dem Anmeldescript nun geqouted (in Abführungszeichen) übergeben. Damit entfallen Probleme, wenn ein Benutzername Leerzeichen enthält
- NEU: Der Laufwerksbuchstabe für Homedirectory und Terminal-Homedirectory darf gleich sein.

Funktionen / Änderungen (Plugin "PasswordTools.ads"):

- unterscheiden ob bei dem AD-User das Flag "Kennwort läuft nie ab" gesetzt
ist oder nicht, und nur die User verändern, bei denen das Flag nicht gesetzt
ist (somit fasst das Script keine Dienst- und Funktionskonten an
und ändert auch nichts beim Admin ..)

- alle ADS Benutzer beim nächsten Login zum Ändern des Passwortes zwingen
(ausser mit Flag "Kennwort läuft nie ab")

- einzelne ADS Benutzer beim nächsten Login zum Ändern des Passwortes zwingen
(ausser mit Flag "Kennwort läuft nie ab")

- alle ADS Benutzern ein neues Kennwort verpassen und optional zum Ändern des
Passwortes zwingen (ausser mit Flag "Kennwort läuft nie ab")

- einzelnen ADS Benutzer ein neues Kennwort verpassen und optional zum Ändern des
Passwortes zwingen (ausser mit Flag "Kennwort läuft nie ab")

- Kontosperrungen für alle, bzw. einen bestimmten User zurücksetzen
(ausser mit Flag "Kennwort läuft nie ab")

Schöne Grüße,
Jens
  Mit Zitat antworten Zitat
renekr

 
Delphi 2007 Enterprise
 
#4
  Alt 17. Aug 2006, 00:45
Hallo Jens,

Kleine Frage:
Ist es auch möglich mit deinem Tool folgendes zu machen:
- "MemberOf" bei den Computereigenschaften auslesen von einem Rechnernamen und diese in eine Datei (excel oder so ) speichern,und oder per Einzel auswahl für anderen Computer übernehmen,oder alle an anderen PC Clonen?

Danke schön
  Mit Zitat antworten Zitat
jensw_2000
 
#5
  Alt 17. Aug 2006, 01:05
Noch nicht

Was kann man mit "Computerkonten in Sicherheitsgruppen" machen, das man nicht auch mit einer sinnvollen OU Struktur für die Computerkonten lösen kann ?

Verrate mir mal was du damit machen willst.
Eventuell ist das ein Feature das ich vermisse ohne es zu kennen .

Bei Bedarf baue ich die Funktion demnächst mit ein.
(Wenn meine kommerziellen Projekte terminlich im Trocknen sind).

Ein VBS Script wäre für solche Sachen sicher unkonfotabel, weil Computerkonten und Sicherheitsgruppen aus dem AD ausgelesen werden müssen bevor man eine passende "Clone-Liste" erstellen kann.

Da wäre ein Tool, das via ADO "live" im AD hängt sicher sinnvoller.

Schöne Grüße,
Jens
  Mit Zitat antworten Zitat
Benutzerbild von TKC
TKC

 
Delphi XE2 Enterprise
 
#6
  Alt 17. Aug 2006, 01:07
Wow .. FETTES DANKE !!

Das Programm ist spitze ... es erleichtert meine tägliche Arbeit enorm.

Eine Tipfehler hab ich noch gefunden ...

(Das Anmeldescript mir dem Parameter <Benutzername> ausführen)
sollte doch sicher
(Das Anmeldescript mit dem Parameter <Benutzername> ausführen)

heissen.

An sonsten weiter so !! Gute Arbeit.
  Mit Zitat antworten Zitat
jensw_2000
 
#7
  Alt 17. Aug 2006, 01:17
Zitat von ACE-ppc:
Wow .. FETTES DANKE !!
Das Programm ist spitze ... es erleichtert meine tägliche Arbeit enorm.
Danke.

Den Tippfehler korrigiere ich gleich.

Alle weiteren bitte "bündeln" und per PN zusenden.

Ich bin Legasthiniker... da kommen schon ein paar Tippfehler zusammen...



Schöne Grüße,
Jens
  Mit Zitat antworten Zitat
renekr

 
Delphi 2007 Enterprise
 
#8
  Alt 17. Aug 2006, 10:47
Hi Jens,
Also wir haben ein Software Verteilungssystem bei uns das die Software als Gruppen anlegt,
Jeden Computerkonto sind Gruppen ( Software ) zugewiessen.

Wenn jemand nun anruft und sagt er benötigt die selbe Software wie auf dem PC xyx dann muss man zuerst den xyx PC suchen memberoff einsehen und im neuen PC im AD alle Gruppen manuell einfügen,suchen und speicher.
Aufwendig.
Deswegen würde es sinn machen eine art Liste von Gruppen von einem PC zu bekommen und diese dann per Auswahl,alle oder einige auf neuen computerkonto zu Replizieren.

Hoffe das war gut formuliert.
  Mit Zitat antworten Zitat
delphipraxisbaur
 
#9
  Alt 19. Jan 2011, 15:12
Ich mag den Kaffee-Marke, wenn die VB-Skript ausgeführt, beeindruckende Sachen. Vielen Dank für diese, ich kann davon profitieren. Ich bin zur Zeit mit Firebrand Training im Gespräch, hat bei denen schon jemand einen 14 dage, dass können Sie hier sehen Biene, MCSE Kurs gemacht? Können Sie Rat? Danke.
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 02:00 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz