This commit is contained in:
JORGE LUIS CAUDILLO ESPARZA
2023-05-11 10:50:00 -07:00
parent dcc03e64a0
commit 55c3cdd2b8
5 changed files with 12 additions and 8 deletions

View File

@@ -36,8 +36,8 @@ Public Class E140 : Implements IHttpHandler, IRequiresSessionState
If ObjEmpresa.GetEmpresas(CveEmpresa, "-1", "-1", "-1", "-1") Then
End If
If ObjEmpresa.Empresa.RutaArchivos.Trim.Length > 0 Then
RutaEmpresa = ObjEmpresa.Empresa.RutaArchivos.Trim
If ObjEmpresa.Empresa.Ruta.Trim.Length > 0 Then
RutaEmpresa = ObjEmpresa.Empresa.Ruta.Trim
End If
ObjEmpresa.Dispose()

View File

@@ -1192,7 +1192,7 @@ Public Class TareasProgramadas : Implements IHttpHandler
If UsuarioActual IsNot Nothing Then
CveUsuario = UsuarioActual.CveUsuario
CveEmpresa = UsuarioActual.CveEmpresa
RutaEmpresa = UsuarioActual.Empresa.RutaArchivos
RutaEmpresa = UsuarioActual.Empresa.Ruta
End If
Dim bdir As String = If(RutaReporte.Contains("Empresas"), ModExtensiones.DirectorioBaseEmpresas, AppDomain.CurrentDomain.BaseDirectory)