CONTROL DE USUARIOS

611 views
Skip to first unread message

aurelio velasquez

unread,
Sep 23, 2019, 12:11:07 PM9/23/19
to Comunidad de Visual Foxpro en Español
AMIGOS PROGRAMADORES BUENOS DIAS
HE DESARROLLADO UN MODULO PEQUEÑO DE VENTAS
Y QUISIERA DARLE PERMISOS A LOS USUARIOS
QUE EL ADMINISTRADOR TENGA ACCESO A TODOS LOS FOMULARIOS Y EL 
USUARIO SOLO A CIERTOS FORMULARIOS
COMO HAGO ESE CODIGO
GRACIAS A TODOS POR SU POYO

ggcagnola gmail

unread,
Sep 23, 2019, 12:14:43 PM9/23/19
to publice...@googlegroups.com

porque los gritos???


tenés que armar una tabla de usuarios, una de tareas y otra que haga el enganche entre el usuario y la tarea

en el menú, o lo que uses para ejecutar los formularios, revisas que el usuario actual y la tarea a ejecutar estén en esa tabla

--
Has recibido este mensaje porque estás suscrito al grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a publicesvfoxp...@googlegroups.com.
Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/d3144896-88a0-4ac9-9b3b-816d55c72bd5%40googlegroups.com.

Víctor Hugo Espínola Domínguez

unread,
Sep 23, 2019, 12:30:27 PM9/23/19
to publice...@googlegroups.com
Por favor no grites al pedir ayuda, en este enlace  http://doughennig.com/papers.aspx lee "Application Security"

Saludos,
Víctor.
Lambaré - Paraguay.



Allan Raúl Acuña

unread,
Sep 23, 2019, 12:32:01 PM9/23/19
to publice...@googlegroups.com
Crea una tabla/cursor/ o form con las opciones de tu menú y en el registros del usuario crea un campo permisos o como quieras, donde guardes, las distintas opciones a las que tiene acceso como por ejemplo: 1_1,1_2,1_3

Como ves 1_1, podria ser que tiene acceso a la opcion 1 del menu y vas separando por comas.

Ahora al momento del logeo del usuario tomas ese campo que es tipo cadena y en cada opcion del menu validas si tiene pormiso a su opcion, algo asi:

!'100_1'$gcPermisos

De esta manera pone FALSO o VERDADERO si esa cadena existe.

Espero haberme explicado !

Saludos cordiales.

Lic. Allan Raúl Acuña
Analista Programador
msn= allan...@hotmail.com
skype= NicEasySoft
            +(505) 8 999 8950
Managua, Nicaragua
Centroam??rica

De: publice...@googlegroups.com <publice...@googlegroups.com> en nombre de ggcagnola gmail <ggca...@gmail.com>
Enviado: lunes, 23 de septiembre de 2019 10:14
Para: publice...@googlegroups.com <publice...@googlegroups.com>
Asunto: Re: [vfp] CONTROL DE USUARIOS
 

Enrique

unread,
Oct 2, 2019, 8:50:16 AM10/2/19
to Comunidad de Visual Foxpro en Español

Hola. Yo lo resuelvo así. Creo una tabla con los nombres de los usuarios. En el evento clic del botón de comandos del formulario, el siguiente código;

mNombre=THISFORM.mNombre.Value
SELECT Usuarios  && Tabla usuarios
 
set orde to Nombre
SET DELETED on

SEEK Nombre

LOCATE FOR nombre=mNombre

 IF FOUND()
   If quita=.T.       && Campo quita de la tabla usuarios (si esta en T, ejecuta el siguiente formulario o en este caso puede eliminar registros
         DO form cuatro4                                                                                                 && Formulario
        thisform.Refresh
      ELSE     
        =MessageBox ("No Tiene Privilegio Para Eliminar Registros..",16,"Sistema Informa")  && No tiene privilegios el usuario.
          Thisform.refresh
          RETURN        
   ENDIF
  ELSE
        =MessageBox ("No Tiene Privilegio Para Eliminar Registros..",16,"Sistema Comunica")
 ENDIF

THISFORM.Refresh

En la tabla usuario, creas los campos que necesitas para controlar lo que tu quieras.

tabla.jpg


saludos cordiales.


Antonio Samper

unread,
Oct 2, 2019, 12:57:23 PM10/2/19
to publice...@googlegroups.com
Hola, Yo lo hago como la imagen: 1- Perfiles, 2 - Acceso segun el perfil del usuario, 3 - Defino Roles, 4 Asigno los roles a los usuarios, funciona perfecto.

Libre de virus. www.avast.com

--
Has recibido este mensaje porque estás suscrito al grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a publicesvfoxp...@googlegroups.com.


--

Antonio Samper G.

Representante

SASYSTEMAS

Mail: sasys...@gmail.com

Tel  :  (57-5) 3584507Celular: 300 3974555

Barranquilla - Colombia



Libre de virus. www.avast.com
ImaUsu.png

Afpsistemas - Fernando Maggi

unread,
Oct 2, 2019, 3:16:47 PM10/2/19
to publice...@googlegroups.com

Antonio, felicitaciones por el diseño de los formularios, muy buenos ¡!

 

Saludos,

Fernando.

 

saludos cordiales.

 

--
Has recibido este mensaje porque estás suscrito al grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a publicesvfoxp...@googlegroups.com.
Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/e47021cf-da5b-4ecd-88ba-ac4f0bf0cbd2%40googlegroups.com.


 

--

Antonio Samper G.

Representante

SASYSTEMAS

Mail: sasys...@gmail.com

Tel  :  (57-5) 3584507Celular: 300 3974555

Barranquilla - Colombia

 

 

Libre de virus. www.avast.com

--
Has recibido este mensaje porque estás suscrito al grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a publicesvfoxp...@googlegroups.com.

image001.jpg

integral

unread,
Oct 2, 2019, 3:22:01 PM10/2/19
to Comunidad de Visual Foxpro en Español

Amigo TONY :

Pinta bien el diseño de los formularios para el control del nivel de acceso del Usuario...

Consulta :

Estas utilizando el menu clasico de VFP 

Y el codigo que aplicas, podrias darnos una idea de com ol orealizas.

Saludos,

INTEGRAL 

Antonio Samper

unread,
Oct 2, 2019, 4:33:38 PM10/2/19
to publice...@googlegroups.com
Gracias amigo.


Libre de virus. www.avast.com

Antonio Samper

unread,
Oct 2, 2019, 4:34:25 PM10/2/19
to publice...@googlegroups.com
Si claro, mañana te escribo y te comento como esta hecho

Libre de virus. www.avast.com

--
Has recibido este mensaje porque estás suscrito al grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a publicesvfoxp...@googlegroups.com.

Antonio Meza

unread,
Oct 2, 2019, 4:45:10 PM10/2/19
to Comunidad de Visual Foxpro en Español
En mi caso dividí el sistema en Componentes, cada componente es un Ejecutable compilado en VFP que llamo desde un Modulo que es otro ejecutable, por lo tanto tengo una tabla donde indico si el usuario tiene acceso al componente y que puede hacer dentro de el, anexo una captura de pantalla.

Antes de abrir un Componente (Formulario) verifico si tiene permisos.

saludos
Antonio Meza


El lunes, 23 de septiembre de 2019, 11:11:07 (UTC-5), aurelio velasquez escribió:
permisos.png

Antonio Samper

unread,
Oct 3, 2019, 3:21:59 PM10/3/19
to publice...@googlegroups.com
Hola Integral, te envió estos dos modelos y uno de los menús en donde invoco una función Skipchoice(con sus parámetros) en esta función se validan las tablas que te envié en la imagen, esta función si devuelve falso no se activa la opción del menú, te estare enviando el resto a medida que vaya teniendo tiempo, cualquier cosa a la orden.

Saludos

Libre de virus. www.avast.com

modelo1.png
modelo2.png
menu.png

Zarlu

unread,
Oct 14, 2019, 11:02:31 AM10/14/19
to Comunidad de Visual Foxpro en Español
Buenos días foxeros!

Aporto mi caso como una idea más...
Este asunto de usuarios y permisos me costó trabajo (me cuesta) asimilarlo.
Y una de mis principales preocupaciones fue el hecho de cuidar que alguien
con conocimientos accesara a las tablas y cambiara los permisos.
Además de que los formularios no tienen siempre los mismos botones, ni
los botones usuales de "nuevo","editar",borrar",imprimir"...

Lo manejo con dos tablas

Tabla usuarios con los campos:
user=numero de usuario
activo= .f. ó .t.
apellido1
apellido2
nombres
usuario= alias del usuario
clave=clave encriptada

Tabla de permisos con los campos:
formul=nombre del formulario y de los botones susceptibles de permisos
etiqueta=etiqueta a mostrar en el modulo de permisos
user1=usuario 1
user2=usuario 2
....y así sucesivamente los usuarios que se deseen.

En estos campos user? se almacena encriptado los nombres de los botones
con permisos que se haya asignado a cada usuario y para cada formulario.
La cadena encriptada se actualiza cada vez que se modifican las facultades
del usuario.

En el init de cada formulario se accesa al campo del usuario, se localiza
el nombre del formulario, se lee de la cadena encriptada los nombres de los
botones que contiene y entonces se activan/desactivan los botones.

Para cada usuario, para cada formulario y para cada botón la encriptación
resulta diferente

Adjunto imagen

zarlu
Chetumal, Quintana Roo, México
permisos.png
Reply all
Reply to author
Forward
0 new messages