Forum
Bildirimler
Hepsini Temizle
Windows Server
3
Yazılar
3
Üyeler
0
Likes
446
Görüntüleme
Konu başlatıcı
Merhaba arkadaşlar,
AD üzerindeki tüm kullanıcılarda "Kullanıcı parolayı değiştiremez" ve "Parola her zaman geçerli olsun" işaretlerini tek bir script ile kaldırmak istiyorum. Bu konuda yardımlarınızı rica ediyorum.
Teşekkürler
Gönderildi : 01/08/2013 14:26
Merhaba, aşağıdaki komut setlerini kullanabilirsiniz, ama mutlaka sisteminizin yedeğiniz alın.
Never Expire için
dsquery user "OU=Muhasebe,DC=cozumpark,DC=com" | dsmod user -pwdneverexpires yes
Cannot change password için - bunu note defteri ile vbs yapmanız gerekli
Option Explicit
Dim objOU, objUser, intUAC
Const ADS_UF_DONT_EXPIRE_PASSWD = &H10000
' Bind to specified OU.
Set objOU = GetObject("LDAP://ou=muhsebe,dc=cozumpark,dc=com")
' Filter on users in the OU.
objOU.Filter = Array("user")
For Each objUser In objOU
' Skip computer objects (which have class "User").
If (objUser.Class = "user") Then
intUAC = objUser.Get("userAccountControl")
' Check if "Password Never Expires" already set.
If (ADS_UF_DONT_EXPIRE_PASSWD AND intUAC) = 0 Then
' Set bit for "Password Never Expires".
objUser.Put "userAccountControl", intUAC OR ADS_UF_DONT_EXPIRE_PASSWD
objUser.SetInfo
End If
End If
Next
Danışman - ITSTACK Bilgi Sistemleri
****************************************************************
Probleminiz Çözüldüğünde Sonucu Burada Paylaşırsanız.
Sizde Aynı Problemi Yaşayanlar İçin Yardım Etmiş Olursunuz.
Eğer sorununuz çözüldü ise lütfen "çözüldü" olarak işaretlerseniz diğer üyeler için çok büyük kolaylık sağlayacaktır.
*****************************************************************
Gönderildi : 01/08/2013 17:26
arayüzden bütün kullanıcıları seçerek yapabilirsiniz.
Gönderildi : 01/08/2013 20:56
