Разблокировка учетной записи Active Directory через VBscript не вызывает событие с кодом

У меня есть сценарий VB, который разблокирует учетную запись AD при запуске, это соответствующая часть:

...
If objUser.Isaccountlocked = True Then 
    objUser.IsAccountLocked = False 
    objUser.SetInfo 
End If 
...

Это все работает, но не создает событие в журнале событий AD.

Конечно, разблокировка учетной записи "вручную" в "Пользователи и компьютеры AD" создает событие 4767 ("Учетная запись пользователя была разблокирована".)

Создает ли разблокировка скриптом какой-то другой идентификатор события? Или действительно ничего вообще?

Большое спасибо.

1 ответ

Событие 4767 добавляется пользователями и компьютерами AD, а не доменом, и записывается, даже если учетная запись не была заблокирована.

Редактирование данных AD напрямую, как вы делаете в своем скрипте, не генерирует эти записи журнала событий аудита.

Вы можете зарегистрировать запись в своем скрипте или, я предлагаю, найти другой способ сделать то, что вы делаете.

Другие вопросы по тегам