Directory Services |
To enable this option, set the PasswordExpired attribute to one (1). Setting this attribute to zero (0) enables the user to log on without changing the password. The following code examples show how to set the change password option.
Set usr = GetObject("WinNT://Fabrikam/jeffsmith,user") usr.Put "PasswordExpired", CLng(1) ' User must change password. usr.SetInfo
IADsUser *pUser = NULL; HRESULT hr; hr=ADsGetObject(L"WinNT://Fabrikam/jeffsmith,user", IID_IADsUser, (void**)&pUser); VARIANT var; VariantInit(&var); V_I4(&var)=1; V_VT(&var)=VT_I4; hr = pUser->Put(_bstr_t("PasswordExpired"),var); // User must change password. hr = pUser->SetInfo(); VariantClear(&var); pUser->Release();