Ruta dinamica de carpeta "Empresas" asignar valor desde el web config

This commit is contained in:
2020-05-12 00:29:19 -07:00
parent 701eec057e
commit 4dd49e29f5
133 changed files with 3971 additions and 3886 deletions

View File

@@ -119,7 +119,7 @@ Partial Class Inventarios_ReporteEntradasSalidas
Dim CveAlmacen = Request("CveAlmacen").ToString
Dim Almacen As String = GlobalDTAlmacen(UsuarioActual.CveEmpresa).FiltroPrimeroValor("Almacen", $"CveAlmacen = {Request("CveAlmacen").ToString}")
DdlAlmacen.Items.Insert(0, New ListItem(Almacen, CveAlmacen))
End If
End If
Else
DdlAlmacen.SelectedValuesIfExistM("-1")
End If
@@ -368,7 +368,7 @@ Partial Class Inventarios_ReporteEntradasSalidas
FechaF = Now
End If
Dim RutaPDF As String
Dim Ruta As String = $"{AppDomain.CurrentDomain.BaseDirectory}Empresas\{UsuarioActual.CveEmpresa}\"
Dim Ruta As String = $"{ModExtensiones.DirectorioBaseEmpresas}Empresas\{UsuarioActual.CveEmpresa}\"
Dim NombreArchivoDescarga = "ReporteEntradas-Salidas"
If UsuarioActual.CveEmpresa.Contiene(119) Then