Correccion de directorio

2020-05-14 12:59:22 -07:00
parent 4696d6af22
commit 61c473e885
7 changed files with 10 additions and 10 deletions
--- a/Bancos/CreditosPagoMultiple.aspx.vb
+++ b/Bancos/CreditosPagoMultiple.aspx.vb
@@ -216,7 +216,7 @@ Partial Class Bancos_CreditosPagoMultiple
        Dim filemove As String = ""
        Dim Comprobante As String = ""
        For Each fileItem As Archivo In filesgral
-            Comprobante = IO.Path.GetExtension(String.Format("{0}Temp\{1}", ModExtensiones.DirectorioBaseEmpresas, fileItem.filename)).Replace(".", "")
+            Comprobante = IO.Path.GetExtension(String.Format("{0}Temp\{1}", AppDomain.CurrentDomain.BaseDirectory, fileItem.filename)).Replace(".", "")
            filemove = fileItem.filename
        Next