Visual Basic para Aplicaciones - Bloquear labels de los forms desde un login

Life is soft - evento anual de software empresarial
 
Vista:
sin imagen de perfil
Val: 286
Bronce
Ha mantenido su posición en Visual Basic para Aplicaciones (en relación al último mes)
Gráfica de Visual Basic para Aplicaciones

Bloquear labels de los forms desde un login

Publicado por fjpg (135 intervenciones) el 02/09/2020 11:12:37
Hola, buenas.
Acudo a ustedes de nuevo para otra duda/problema.

He conseguido hacer un lolin multiusuario con contraseña.

Se mostrar u ocultar hojas del libro dependiendo si el usuario es admin, invitado o usuario.
Pero desearia, bloquear (enabled) labels de mis forms para evitar eliminar o modificar clientes, articulos, proveedores, etc....

Pero estoy estancado!!

Dejo el codigo del login:



Dim Fila, Final, i As Long

Fila = Hoja10.Range("A" & Rows.Count).End(xlUp).Row + 1
Final = Fila - 1


'Validar campos vacios
If cbx_usuario = "" Or txt_contrasena = "" Then
MsgBox "Debes de rellenar todos los campos.", vbCritical, "CONTROL DE ALMACÉN"
Exit Sub
End If


' Si encuentra el usuario
For i = 2 To Final

If UCase(cbx_usuario) = UCase(Hoja10.Cells(i, 3)) And UCase(txt_contrasena.Text) = UCase(Hoja10.Cells(i, 4)) Then

MsgBox "¡¡ Bienvenido al sistema " & Me.cbx_usuario & " !!", vbInformation, "CONTROL DE ALMACÉN"
Hoja10.Cells(2, 9) = Me.cbx_usuario
Unload Me
Application.Visible = True
frm_inicio.Show

Exit Sub

End If

Next i


' Si no encuentra el usuario
MsgBox "Usuario y/o contraseña incorrecto", vbCritical, "CONTROL DE ALMACÉN"
cbx_usuario = Empty
txt_contrasena = Empty
cbx_usuario.SetFocus
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de MIGUEL
Val: 424
Bronce
Ha mantenido su posición en Visual Basic para Aplicaciones (en relación al último mes)
Gráfica de Visual Basic para Aplicaciones

Bloquear labels de los forms desde un login

Publicado por MIGUEL (121 intervenciones) el 03/09/2020 05:26:33
Buenas fjpg

La manera mas fácil es crear variables publicas que guarden que permisos tiene el usuario al momento de logearse, ya con ellas podrás decidir que estará habilitado en cada uno de los userform y si quieres podrás hacer un userform para que un administrador que ande por ahí de paso le otorgue permiso provisional para realizar el movimiento que se requiera hacer en ese momento, así se evitaría el cambio de usuario en la aplicación.

Si tienes dudas me puedes pasar el archivo para echarte un guante.

Saludos.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar
sin imagen de perfil
Val: 286
Bronce
Ha mantenido su posición en Visual Basic para Aplicaciones (en relación al último mes)
Gráfica de Visual Basic para Aplicaciones

Bloquear labels de los forms desde un login

Publicado por fjpg (135 intervenciones) el 03/09/2020 09:09:38
Aqui te dejo el archivo.

usuario fjpg
contraseña1234

En este ejemplo, si es usuario, necesito que los labels de articulo de moficicar y eliminar esten enabled y si es admin que este operativo.

GRACIAS!!!
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
sin imagen de perfil
Val: 286
Bronce
Ha mantenido su posición en Visual Basic para Aplicaciones (en relación al último mes)
Gráfica de Visual Basic para Aplicaciones

Bloquear labels de los forms desde un login

Publicado por fjpg (135 intervenciones) el 03/09/2020 23:58:10
Las hojas si que se ocultarlas.

Pero lo que necesito es que se deshabiliten los labels que no quiero que un usuario pueda usar. Y se habiliten si el que hace el login tiene la categoria de admin.

de todas formas, se agradece la ayuda Antoni.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
sin imagen de perfil
Val: 286
Bronce
Ha mantenido su posición en Visual Basic para Aplicaciones (en relación al último mes)
Gráfica de Visual Basic para Aplicaciones

Bloquear labels de los forms desde un login

Publicado por fjpg (135 intervenciones) el 04/09/2020 09:19:45
Perfecto como siempre.
GRACIAS CRACK!!!!
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar