This commit is contained in:
2020-12-29 17:40:47 -07:00
16 changed files with 3962 additions and 3088 deletions

View File

@@ -5058,8 +5058,12 @@ Partial Class Bancos_IE
Dim fileItem As Archivo = Filesgral(0)
Dim Path As String = HttpContext.Current.Request.ApplicationPath
Comprobante = IO.Path.GetExtension(String.Format("{0}Temp\{1}", AppDomain.CurrentDomain.BaseDirectory, fileItem.filename)).Replace(".", "")
Path = HttpContext.Current.Request.MapPath(Path)
Path = Extensiones.DirectorioBaseEmpresas
Path += String.Format("Empresas/{0}/IE", UsuarioActual.CveEmpresa)
If Not Directory.Exists(Path) Then
Directory.CreateDirectory(Path)
End If