- cambios en acceso

This commit is contained in:
2024-04-12 20:03:30 -07:00
parent 7bd0cd9248
commit 94545ac8ce
2 changed files with 17 additions and 41 deletions

View File

@@ -99,8 +99,7 @@ Partial Class Sistemas_PopUpCambiaUsuario
Dim Usuario As Usuario
'Dim UsuarioAsignaciones As Usuario
Usuario = ObjUsuario.ValidaUsuario(tUsuario, tContraseña, IMEI, tCveEmpresa)
'UsuarioAsignaciones = ObjUsuario.ValidaUsuarioAsignacion(Usuario.CveUsuario, Usuario.CveEmpresa)
Usuario = ObjUsuario.ValidaUsuario(tUsuario, tContraseña, tCveEmpresa)
ObjUsuario.Dispose()
If Usuario IsNot Nothing Then