我如何在遠程計算機上禁用管理員組的用戶帳戶的VBS

Question

的幫助下，我需要做這樣的事情代碼

strUser = "myUser" 
strComputer = "myremoteComuter" 
strPassword = "myPassword_" 

Set objUser = GetObject("WinNT://" & strComputer & "/" & strUser & ",user",strUser,strPassword) 


If Err.Number = 0 Then 
objUser.AccountDisabled = true 
objUser.SetInfo 
End If 

但有沒有這樣的方法GetObject這需要3個參數。

Answer 1

我發現的代碼剪斷：

Const ADS_SECURE_AUTHENTICATION = 1 
Set objUser = GetObject("WinNT:").OpenDSObject("WinNT://MyDomain/UserNameToEnable,user",AdminUserName,AdminUserPassword, ADS_SECURE_AUTHENTICATION) 
objUser.AccountDisabled = true 
objUser.SetInfo