계정 만료(LDAP 공급자)

계정 만료 날짜를 설정하려면 IADsUser.AccountExpirationDate 속성을 원하는 날짜 값으로 설정합니다. 계정 만료 날짜를 사용하지 않도록 설정하려면 accountExpires 특성을 0으로 설정합니다. 다음 코드 예제에서는 만료 날짜를 설정하는 방법을 보여 줍니다.

Public Sub SetUserAccountExpirationDate(User As IADsUser, ExpirationDate As Date)
    If 0 = ExpirationDate Then
        ' Disable the account expiration date.
        User.Put "accountExpires", 0
    Else
        ' Set the new account expiration date.
        User.AccountExpirationDate = ExpirationDate
    End If
    
    User.SetInfo
 
End Sub

/***************************************************************************

    SetUserAccountExpirationDate()

***************************************************************************/

HRESULT SetUserAccountExpirationDate(IADsUser *pUser, DATE date)
{
    if(!pUser) 
    {
        return E_INVALIDARG;
    }

    HRESULT hr;

    if(!date || date < 0) 
    {
        // Account never expires. Set the accountExpires attribute to zero.
        VARIANT var;
        VariantInit(&var);
        V_I4(&var) = 0;
        V_VT(&var) = VT_I4;
        
        hr = pUser->Put(CComBSTR("accountExpires"), var); 

        VariantClear(&var);
    }
    else 
    {
        // Account expires on date.
        hr = pUser->put_AccountExpirationDate(date); 
    }

    if(S_OK == hr)
    {
        hr = pUser->SetInfo();
    }

    return hr;
}

메모

accountExpires 특성에는 계정 만료 날짜가 포함됩니다. Active Directory 사용자 및 컴퓨터 MMC 스냅인에는 계정이 만료되는 날짜가 표시됩니다. 즉, Active Directory 사용자 및 컴퓨터 MMC 스냅인은 계정 만료 날짜를 accountExpires 특성에 포함된 날짜보다 하루 일찍 표시합니다.