Compartir a través de

Cuenta deshabilitada (proveedor LDAP)

  • Artículo

Para deshabilitar una cuenta de usuario, establezca la propiedad AccountDisabled en TRUE en la interfaz IADsUser . Esto es similar al proveedor winNT. En los ejemplos de código siguientes se muestra cómo deshabilitar una cuenta de usuario.

Ejemplo 1

Dim usr As IADsUser
On Error GoTo Cleanup

Set usr = GetObject("LDAP:// CN=JeffSmith, OU=Sales, DC=Fabrikam, DC=Com")
usr.AccountDisabled = TRUE ' Disable the account.
usr.SetInfo

Cleanup:
    If (Err.Number<>0) Then
        MsgBox("An error has occurred. " & Err.Number)
    End If

    Set usr = Nothing

Ejemplo 2

IADsUser *pUser = NULL;

HRESULT hr = S_OK;
LPWSTR adsPath;
adsPath=L"LDAP://serv1/cn=Jeff Smith,cn=Users, dc=Fabrikam, dc=com";
hr = ADsGetObject(adsPath,IID_IADsUser,(void**)&pUser);

if(FAILED(hr)){return;}

hr = pUser->put_AccountDisabled(true);
hr = pUser->SetInfo();