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()