Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Passwort-Reset Batch für User in einer OU und direkt auch alles Unter-OU eingebunden

Frage Entwicklung Batch & Shell

Mitglied: ineichp

ineichp (Level 1) - Jetzt verbinden

03.04.2009, aktualisiert 10:45 Uhr, 4185 Aufrufe, 2 Kommentare

Hallo

Mein bestehender Batch sieht wiefolgt aus, er setzt alles Passwörter der User in der OU=abteilung01 zurück auf test-01.

Set objOU = GetObject("LDAP://ou=abteilung01,dc=firma,dc=ch")
ObjOU.Filter = Array("user")
WScript.Echo "Bei folgenden User Accounts wurde das Passwort auf test-01 zurueckgestellt:" & vbCrLF
For Each objUser in objOU
WScript.Echo objUser.sAMAccountName & " (" & Replace(objUser.Name, "CN=", "") & ")"
objUser.SetPassword "test-01"
Next


Soweit so gut...Zu meiner Frage / Zu meinem Problem:

In der OU=abteilung01 sind noch "Unter-OU" bez. andere Container (z.B. unterabteilung01). In diesen sind auch noch User.
Wie kann man den Batch so modifizieren das er alle alle User nimmt. Auch die, die in einem Unter-Container sind?

Danke für die Hilfe...
Mitglied: bastla
03.04.2009 um 21:31 Uhr
Hallo ineichp und willkommen im Forum!

Ungetestet (aber auf Basis einer Lösung von Richard Mueller) etwa so:
01.
Set objOU = GetObject("LDAP://ou=abteilung01,dc=firma,dc=ch") 
02.
 
03.
WScript.Echo "Bei folgenden User Accounts wurde das Passwort auf test-01 zurueckgestellt:" & vbCrLF 
04.
EnumUsers(objOU) 
05.
 
06.
Sub EnumUsers(objParent) 
07.
objParent.Filter = Array("user") 
08.
 
09.
For Each objUser In objParent 
10.
    WScript.Echo objUser.sAMAccountName & " (" & Replace(objUser.Name, "CN=", "") & ")" 
11.
    objUser.SetPassword "test-01" 
12.
Next 
13.
 
14.
objParent.Filter = Array("organizationalUnit") 
15.
For Each objChild In objParent 
16.
    EnumUsers(objChild) 
17.
Next 
18.
End Sub
Grüße
bastla

P.S.: Dein "Batch" wäre in meinem Sprachgebrauch ein "Script" ...
Bitte warten ..
Mitglied: ineichp
06.04.2009 um 09:50 Uhr
Hallo bastla

Super...Hat funktioniert. Danke vielmals...

Zu deinem P.S.:

In der Schweiz spricht man (Sprachgebaurch) meistens von einem Batch. Egal ob Skript oder effektiv ein Batch.

Gruss
Ineichp
Bitte warten ..
Neuester Wissensbeitrag
Windows 10

Powershell 5 BSOD

Tipp von agowa338 zum Thema Windows 10 ...

Ähnliche Inhalte
Heiß diskutierte Inhalte
Windows Userverwaltung
Ausgeschiedene Mitarbeiter im Unternehmen - was tun mit den AD Konten? (34)

Frage von patz223 zum Thema Windows Userverwaltung ...

LAN, WAN, Wireless
gelöst Server erkennt Client nicht wenn er ausserhalb des DHCP Pools liegt (28)

Frage von Mar-west zum Thema LAN, WAN, Wireless ...

Windows Server
Server 2008R2 startet nicht mehr (Bad Patch 0xa) (18)

Frage von Haures zum Thema Windows Server ...