- cambio en acceso

2024-04-13 06:54:02 -07:00
parent 3cf78ec01b
commit 2a4984b5ac
9 changed files with 12 additions and 12 deletions
--- a/Ashx/E48.ashx
+++ b/Ashx/E48.ashx
@@ -405,7 +405,7 @@ Public Class E48 : Implements IHttpHandler, IRequiresSessionState
            If ObjUsuarios.DtResultados.Rows.Count > 0 Then
                Dim Usuario As String = ObjUsuarios.DtResultados.Rows(0)("Usuario").ToString()
                Dim Contrasenia As String = ObjUsuarios.DtResultados.Rows(0)("Contraseña").ToString()
-                UsuarioActual = ObjUsuarios.ValidaUsuario(Usuario, Contrasenia, IMEI, CveEmpresa)
+                UsuarioActual = ObjUsuarios.ValidaUsuario(Usuario, Contrasenia, CveEmpresa:=CveEmpresa)
                UsuarioActual.CveEmpresa = CveEmpresa
                CreaObjetoEmpresa(UsuarioActual)
            End If