From 8fab01fff612e7fdb546aea3fe2494db7168d11c Mon Sep 17 00:00:00 2001
From: rrene <rrene@DESKTOP-04EII7E>
Date: Tue, 19 May 2020 09:30:37 -0700
Subject: [PATCH] -cambio de ruta

---
 Site.master.vb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Site.master.vb b/Site.master.vb
index bd03f5832..71df0dc42 100644
--- 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()