Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Bases de datos > Firebird e Interbase
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 22-08-2007
Avatar de sitrico
[sitrico] sitrico is offline
Miembro Premium
 
Registrado: may 2003
Ubicación: Caracas, Venezuela
Posts: 295
Poder: 22
sitrico Va por buen camino
Asignar permisos a usuarios

Que permisos debo asignar para que CUALQUIER usuario pueda ejecutar el Siguiente procedimiento:

Código SQL [-]
SET TERM ^ ;

CREATE PROCEDURE LEERDATOSUSUARIO 
returns (
    idusuario integer,
    usuario char(40),
    cedula char(10),
    activo integer)
as
begin
  FOR SELECT idusuario, Usuario, cedula, activo FROM dg_usuarios
      Where login = current_user Into :idusuario, :usuario, :cedula, :activo do
  suspend;
end^

SET TERM ; ^

GRANT SELECT ON DG_USUARIOS TO PROCEDURE LEERDATOSUSUARIO;

GRANT EXECUTE ON PROCEDURE LEERDATOSUSUARIO TO "PUBLIC";
GRANT EXECUTE ON PROCEDURE LEERDATOSUSUARIO TO SYSDBA;

La idea es que al conectarse cualquier usuario (actual o futuro) pueda ver si está activo ó no antes de permitir la entrada.

Preferiría no dar acceso publico a la tabla DG_USUARIOS

Código SQL [-]
CREATE TABLE DG_USUARIOS (
    IDUSUARIO       INTEGER NOT NULL,
    USUARIO         CHAR(40),
    CEDULA          CHAR(10),
    LOGIN           CHAR(15),
    IDROL           SMALLINT NOT NULL,
    IDCARGO         SMALLINT,
    IDESPECIALIDAD  SMALLINT,
    ACTIVO          SMALLINT DEFAULT 0 NOT NULL
);

/* Privileges of procedures */
GRANT SELECT ON DG_USUARIOS TO LEERDATOSUSUARIO;

Con esta configuración cuando ingreso como usuario "normal" (no SYSDBA) no me deja leer los datos.
__________________
Sitrico
Responder Con Cita
  #2  
Antiguo 23-08-2007
Avatar de rastafarey
rastafarey rastafarey is offline
Miembro
 
Registrado: nov 2003
Posts: 927
Poder: 21
rastafarey Va por buen camino
Resp

Dale los permisos a los usuarios
__________________
Todo se puede, que no exista la tecnología aun, es otra cosa.
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Diseño de una BD - Usuarios, Perfiles, Permisos Delphius Conexión con bases de datos 3 09-01-2007 17:42:48
Crear carpeta en Linux y asignar permisos kikecg Varios 0 18-12-2006 12:23:30
Permisos, roles y usuarios TJose Firebird e Interbase 0 04-04-2005 16:22:19
permisos de red nicocer API de Windows 2 18-06-2004 20:17:46
Backup de Usuarios y permisos en W2000 Server gines Windows 3 31-07-2003 12:40:43


La franja horaria es GMT +2. Ahora son las 06:26:03.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi