Как я могу отключить учетную запись группы администраторов на удаленной машине с помощью VBS - PullRequest
0 голосов
/ 22 октября 2011

Мне нужно сделать что-то вроде этого кода

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 параметра.

1 Ответ

0 голосов
/ 03 ноября 2011

Я нашел фрагмент кода:

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