"암호 사용 기간 제한 없음"을 VBS로 비활성화하기 (How to disable "password never expires" with VBScript)

팁 & 문제해결/Windows2013. 4. 9. 23:48pamsoo

대략 이런 방식으로.

 

CONST ADS_UF_DONT_EXPIRE_PASSWD = &H10000

Set objUser = GetObject("WinNT://./" & CreateObject("WScript.Network").Username)

Set objUserFlags = objUser.Get("UserFlags")

if (objUserFlags And ADS_UF_DONT_EXPIRE_PASSWD) = ADS_UF_DONT_EXPIRE_PASSWD Then

  objUser.Put "Userflags", objUserFlags Xor ADS_UF_DONT_EXPIRE_PASSWD

End If

objUser.setInfo

 

자세한 설명은 생략.

 

참고 사이트:

  - ADS_USER_FLAG_ENUM enumeration

  - Password Never Expires (WinNT Provider)

,