Terminalleri Domainden Çikartma

Posted: 11 Mayıs 2011 in Script, Sistem

Terminalleri script kullanarak domainden düsürmek için ise asagidaki kodu kullanabilirsiniz.

Sifre ve Kullanici adi kisimlarini düzenliyoruz. Script basarili sekilde uygulandiktan sonra “Sistemi Yeniden Baslatin” gibi bir uyari veriyor. Bunuda düzenleyebilirsiniz.

Domainden düsürülen terminallerin Computer Accountlar’i, AD içinde manuel olarak silinmeli.

strServer = “.”
Set objWMI = GetObject(“winmgmts:\\” & strServer & “\root\cimv2″)
strWQL = “select * from Win32_ComputerSystem”
Set objInstances = objWMI.ExecQuery(strWQL,,48)

For Each objInstance in objInstances
p_Password = “Sifre”
p_UserName = “Kullanici adi”
p_FUnjoinOptions = 0

intResult = objInstance.UnjoinDomainOrWorkgroup(p_Password, p_UserName, p_FUnjoinOptions)
Select case intResult

Case 0 : WScript.Echo “Sistemi Yeniden Baslatin”
End Select
Next

Bir Cevap Yazın

Aşağıya bilgilerinizi girin veya oturum açmak için bir simgeye tıklayın:

WordPress.com Logosu

WordPress.com hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Twitter resmi

Twitter hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Facebook fotoğrafı

Facebook hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Google+ fotoğrafı

Google+ hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Connecting to %s