Visual Basic - desabilitar

Life is soft - evento anual de software empresarial
 
Vista:

desabilitar

Publicado por Daniel (23 intervenciones) el 28/02/2004 02:03:35
Tengo en mi pantalla principal una barra de menu, con Solicitud, Reembolso, Reportes, Mantenimiento y Salr, yo quiero desabilitar el menu de mantenimiento para que no todas las personas que ingresen al sistema no tengan acceso, sino dependiendo de la clave que utilizó para entrar, la conexion de la pantalla de ingreso de login la tengo hecha, lo unico que necesito saber es como hacer para desabilitar ese menu en especifico.
por ejemplo este es mi codigo

Adodc1.RecordSource = "select * from Usuarios where Login_User='" & Me.txtlogin.Text & "'"
Adodc1.Refresh
If Adodc1.Recordset.RecordCount > 0 Then
If Adodc1.Recordset("Pass_User") = txtpass.Text Then
If Adodc1.Recordset("Login_User") = "Admin" Then
Adodc1.Recordset("Acces_User") = False
Adodc1.Recordset.Update
End If
MsgBox "Bienvenido al Sistema Automatizado para el Control y Seguimiento de Reembolsos de Siniestros y Cartas Avales", vbInformation, "Mensaje de Bienvenida"
menu.Show
Unload Me
Else
MsgBox "Credenciales inválidas", vbCritical, "Mensaje de Seguridad"
txtlogin.Text = ""
txtpass.Text = ""
Me.txtlogin.SetFocus
Exit Sub
End If
Else
MsgBox "Credenciales inválidas", vbCritical, "Mensaje de Seguridad"
txtlogin.Text = ""
txtpass.Text = ""
Me.txtlogin.SetFocus
Exit Sub
End If
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

RE:desabilitar

Publicado por mIgUeL aNgeL (1042 intervenciones) el 28/02/2004 20:25:31
Me imagino que tienes dados de Alta los menus en alguna Tabla para así cuando entre el usuario al sistema busque si tiene derecho sobre los menus, sí a ese usuario no le pertenece ese menu \"Mantenimiento \"es sencillo con la instruccion ejemplo:
mnuMantenimiento.Enabled=False
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

RE:desabilitar

Publicado por saulo (4 intervenciones) el 29/02/2004 01:05:17

has lo siguiente
por ejemplo: un menu archivo...
el caption es "archivo", el Key es Arc

para desabilitarlo por codigo pones
Mdiform.arc.enabled=false "desactivado
Mdiform.arc.enabled=true "activado

Mdiform es el formulario donde tienes el menu
Arc es el key que le asignaste cuando definiste tu menu

espero te sirva

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