Scadenza dell'account (provider LDAP)

Per impostare la data di scadenza dell'account, impostare la proprietà IADsUser.AccountExpirationDate sul valore di data desiderato. Per disabilitare la data di scadenza dell'account, impostare l'attributo accountExpires su zero. Negli esempi di codice seguenti viene illustrato come impostare la data di scadenza.

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;
}

Nota

L'attributo accountExpires contiene la data di scadenza dell'account. Il Utenti e computer di Active Directory snap-in MMC visualizza la data di scadenza dell'account alla fine di . Ovvero, lo snap-in MMC Utenti e computer di Active Directory visualizzerà la data di scadenza dell'account come un giorno prima della data contenuta nell'attributo accountExpires.