域環(huán)境下改更本機(jī)管理員密碼

發(fā)布時(shí)間: 2012/9/7 19:01:23

在AD環(huán)境中,有時(shí)候電腦的本機(jī)管理員不記得了,或是被用隨意更改了,作為管理員想將下面電腦的管理員密碼統(tǒng)一的話,可以用腳本實(shí)現(xiàn)！
Dim oWshNetwork
Set oWshNetwork = WScript.CreateObject("WScript.Network")
Dim strComputer
strComputer = oWshNetwork.ComputerName
'WScript.Echo strComputer
Set objUser = GetObject("WinNT://" & strComputer & "/Administrator, user")
objUser.SetPassword "passwor"
objUser.SetInfo

有需要的用戶,可以下載附件,用記事本編輯將"password"改為你需要的密碼,放在domain.com\SYSVOL\domain.com\scripts下面《VBS引自：http://hubuxcg.blog.51cto.com/2559426/458076》
然后使用組策略進(jìn)行部署啟動(dòng)腳本，如圖1

然后添加剛才的腳本，但一定要是網(wǎng)絡(luò)路徑，不然會(huì)報(bào)錯(cuò)！

億恩科技地址(ADD)：鄭州市黃河路129號(hào)天一大廈608室郵編(ZIP)：450008 傳真(FAX)：0371-60123888
   聯(lián)系：億恩小凡
   QQ：89317007
   電話:0371-63322206

本文出自：億恩科技【www.ruiliheng.com】

服務(wù)器租用/服務(wù)器托管中國(guó)五強(qiáng)！虛擬主機(jī)域名注冊(cè)頂級(jí)提供商！15年品質(zhì)保障！--億恩科技[ENKJ.COM]