-cambio de ruta

2020-05-19 09:30:37 -07:00
parent 7bab378f70
commit 8fab01fff6
1 changed files with 1 additions and 1 deletions
--- a/Site.master.vb
+++ b/Site.master.vb
@@ -463,7 +463,7 @@ Partial Class Site

    Private Function ConvertCER() As String
        Try
-            Dim Archivo As String = String.Format("{0}Empresas\{1}\Certificados\{2}", AppDomain.CurrentDomain.BaseDirectory, UsuarioActual.CveEmpresa, UsuarioActual.Empresa.ArchivoCer)
+            Dim Archivo As String = String.Format("{0}Empresas\{1}\Certificados\{2}", ModExtensiones.DirectorioBaseEmpresas, UsuarioActual.CveEmpresa, UsuarioActual.Empresa.ArchivoCer)
            If File.Exists(Archivo) Then
                Dim CerFile As New FileStream(Archivo, FileMode.Open, FileAccess.Read)
                Dim Size As Integer = CerFile.Length.ToString.ToEntero()