Здравствуйте, Molkov, Вы писали:
M>Есть задача: на сервере Win2KServ без домена находятся порядка 100 пользователей... необходимо им установить флаг "Срок действия пароля не ограничен".
M>при выполнении следующего кода возникает ошибка
M>M>4: Set objUser = GetObject("WinNT://" & ServerName & "/" & UserName & ",user")
M>5: intUAC = objUser.Get("userAccountControl")
M>
M>Ругается на строку 5 и говорит: "Свойства службы каталогов Active Directory не могут быть найдены в кэше"
M>В чем загвоздка? Каким образом нужно модифицировать скрипт?
А если
intUAC = objUser.Get("UserFlags")
то что?
