Permisos a usuarios access 2007
Agradezco en lo que me puedas colaborar de antemano,
Lo que sucede es que tengo una base de datos que al iniciar me muestra un formulario donde me pregunta el usuario y la contraseña que esta ingresando y si este usuario y esta contraseña existen entonces que me muestre el panel de control utilizo este código y me esta funcionando OK.
Private Sub Comando15_click()
Dim rs As Object
Set rs = Me.RecordsetClone
rs.FindFirst "[USUARIO] = """ & Me.txtusuario & """"
If Not rs.EOF Then
Me.Bookmark = rs.Bookmark
If Me.TxtClave = Me.CLAVE Then
txtusuario = Null
TxtClave = Null
DoCmd.Close
DoCmd.OpenForm "PANEL DE CONTROL", acNormal
Else
MsgBox "Usuario o Contraseña Inexistente!"
End If
Else
MsgBox "Debes ingresar Portal,usuario y contraseña!!!"
End If
End Sub
//// Lo que deseo es lograr proteger mi base datos?
Dentro de la tabla de usuarios cada usuario tiene un rol por ejemplo JUAN clave *** y rol OPERADOR1 o OPERADOR2 y uno único que seria Yo Administrador, entonces lo que deseo en si es que según el rol unicamente el administrador pueda tener acceso al diseño de la base de datos y que los a los otros roles unicamente puedan realizar acciones especificas LEER, MODIFICAR O CAMBIAR DATOS, AGREGAR O ELIMINAR que ojala se pudiera como generar un formulario de permisos donde yo le diga que de acuerdo al rol solo lea o agregue o elimine etc. Adicional a esto que sea yo el único que asigne esos permisos al rol (ADMINISTRADOR ÚNICO QUE PUEDA TENER ACCESO AL FORMULARIO DE PERMISOS).
Que pena molestar tanto pero que por ejemplo si ingresa alguien que no tiene usuario lo pueda crear el mismo y se asigne el rol él (esta parte ya la tengo y funciona bien también) es decir que la codicion este asignada al ROL
Espero puedas entender lo que deseo me serviría mucho pues no soy muy experto y lo que se es empíricamente entonces no me gustaría que nadie metiera las manos donde no debe.
Lo que sucede es que tengo una base de datos que al iniciar me muestra un formulario donde me pregunta el usuario y la contraseña que esta ingresando y si este usuario y esta contraseña existen entonces que me muestre el panel de control utilizo este código y me esta funcionando OK.
Private Sub Comando15_click()
Dim rs As Object
Set rs = Me.RecordsetClone
rs.FindFirst "[USUARIO] = """ & Me.txtusuario & """"
If Not rs.EOF Then
Me.Bookmark = rs.Bookmark
If Me.TxtClave = Me.CLAVE Then
txtusuario = Null
TxtClave = Null
DoCmd.Close
DoCmd.OpenForm "PANEL DE CONTROL", acNormal
Else
MsgBox "Usuario o Contraseña Inexistente!"
End If
Else
MsgBox "Debes ingresar Portal,usuario y contraseña!!!"
End If
End Sub
//// Lo que deseo es lograr proteger mi base datos?
Dentro de la tabla de usuarios cada usuario tiene un rol por ejemplo JUAN clave *** y rol OPERADOR1 o OPERADOR2 y uno único que seria Yo Administrador, entonces lo que deseo en si es que según el rol unicamente el administrador pueda tener acceso al diseño de la base de datos y que los a los otros roles unicamente puedan realizar acciones especificas LEER, MODIFICAR O CAMBIAR DATOS, AGREGAR O ELIMINAR que ojala se pudiera como generar un formulario de permisos donde yo le diga que de acuerdo al rol solo lea o agregue o elimine etc. Adicional a esto que sea yo el único que asigne esos permisos al rol (ADMINISTRADOR ÚNICO QUE PUEDA TENER ACCESO AL FORMULARIO DE PERMISOS).
Que pena molestar tanto pero que por ejemplo si ingresa alguien que no tiene usuario lo pueda crear el mismo y se asigne el rol él (esta parte ya la tengo y funciona bien también) es decir que la codicion este asignada al ROL
Espero puedas entender lo que deseo me serviría mucho pues no soy muy experto y lo que se es empíricamente entonces no me gustaría que nadie metiera las manos donde no debe.
1 respuesta
Respuesta de xavi -ae soft-
1