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

PW Change erzwingen per VBScript im Active Directory

Frage Microsoft Windows Userverwaltung

Mitglied: -Giraffe-

-Giraffe- (Level 1) - Jetzt verbinden

19.02.2013 um 17:47 Uhr, 2363 Aufrufe, 2 Kommentare, 1 Danke

Guten Abend,

kann mir bitte jemand in den nachfolgenden Quellcode die Funktion implementieren das auch für alle User der Haken bei "Benutzer muss Kennwort bei der nächsten Anmeldung ändern" gesetzt wird? Das wäre spitzenmäßig.

01.
Set objOU = GetObject _ 
02.
("LDAP://ou=UsersGeneric,ou=Test,ou=IT,ou=AdminUnits,dc=YYYY,dc=XXXX,dc=com") 
03.
objOU.Filter = Array("user") 
04.
WScript.Echo "Fuer folgende User Accounts wurde das Passwort zurueckgestellt:" & vbCrLF 
05.
For Each objUser in objOU 
06.
 	WScript.Echo objUser.sAMAccountName & " (" & Replace(objUser.Name, "CN=", "") & ")" 
07.
 	objUser.SetPassword "TesT2007" 
08.
Next
Herzlichen Dank an alle.
Mitglied: Friemler
19.02.2013 um 22:41 Uhr
Hallo,

war Google down? Schau mal hier nach.

Gruß
Friemler
Bitte warten ..
Mitglied: -Giraffe-
20.02.2013, aktualisiert um 00:23 Uhr
Super!

Problem gelöst, anbei noch die Lösung für zukünftig Interessierte:

01.
Set objOU = GetObject _ 
02.
("LDAP://ou=UsersGeneric,ou=Test,ou=IT,ou=AdminUnits,dc=YYYY,dc=XXXX,dc=com") 
03.
objOU.Filter = Array("user") 
04.
WScript.Echo "Fuer folgende User Accounts wurde das Passwort zurueckgestellt:" & vbCrLF 
05.
For Each objUser in objOU 
06.
 	WScript.Echo objUser.sAMAccountName & " (" & Replace(objUser.Name, "CN=", "") & ")" 
07.
 	objUser.SetPassword "TesT2007" 
08.
        objUser.Put "pwdLastSet", 0  
09.
        objUser.SetInfo  
10.
Next
Gute Nacht
Bitte warten ..
Neuester Wissensbeitrag
Windows 10

Powershell 5 BSOD

(3)

Tipp von agowa338 zum Thema Windows 10 ...

Ähnliche Inhalte
Windows Server
gelöst Active Directory CA öffentlich vertrauenswürdig machen, geht das? (2)

Frage von DeathangelCH zum Thema Windows Server ...

Windows Server
gelöst Active Directory File Extension - Associated Program (11)

Frage von adm2015 zum Thema Windows Server ...

Windows 8
gelöst Active Directory Default User.v2 Profile - Windows 8.1 Apps Error (4)

Frage von adm2015 zum Thema Windows 8 ...

Windows Server
Active Directory sinnvoll für kleine Firma (15)

Frage von WolfPeano zum Thema Windows Server ...

Heiß diskutierte Inhalte
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 ...

Outlook & Mail
Outlook 2010 findet ost datei nicht (18)

Frage von Floh21 zum Thema Outlook & Mail ...

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

Frage von Haures zum Thema Windows Server ...