SoftwareEngineering/ProgramLanguage/WSH/VBScript
' ' SID履歴をクリアする ' Const ADS_PROPERTY_DELETE = 4 ' SID履歴を削除するオブジェクトを取得する set targetObject = GetObject("LDAP://target_computer_name.target.codereign.org/CN=TargetObject,CN=targetObjects,DC=target,DC=codereign,DC=org") ' SID履歴をすべて削除する targetObject.PutEx ADS_PROPERTY_DELETE, "sIDHistory", targetObject.GetEx("sIDHistory") targetObject.SetInfo