vbsパスワードリセット（変更） Option Explicit dim ldap ldap = "LDAP://CN=aaaa,OU=Users,DC=mydomain,DC=local" dim objUser set objUser = GetObject(ldap) dim last last = objUser.PasswordLastChanged objUser.SetPassword "aaaaaaaa" objUser.SetInfo set objUser = GetObject(ldap) Msgbox last & vbcrlf & objUser.PasswordLastChanged 更新したあとユーザーを再び取得しないとパスワード最終更新日は変わらないっぽい。
