Logotipos correciones

Contabilidad/FiltraPolizas.aspx.vb

@@ -217,7 +217,7 @@ Partial Class Contabilidad_FiltraPolizas
         If DtDatos IsNot Nothing Then
             Dim params As New List(Of ReportParameter)
             Dim Imagen As New System.IO.FileInfo(String.Format("{0}/Logo.png", UsuarioActual.Empresa.Ruta))
-            Dim logouri = String.Format("{0}://{1}:{2}/Empresas/{3}/Logo.png", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, UsuarioActual.CveEmpresa)
+            params.Add(New ReportParameter("LogoPath", $"file://{Imagen.FullName}"))
             Dim dt As DataTable = DtDatos
 
 
@@ -227,7 +227,7 @@ Partial Class Contabilidad_FiltraPolizas
             params.Add(New ReportParameter("Periodo", DdlPeriodo.SelectedItem.ToString))
 
             If Imagen.Exists Then
-                params.Add(New ReportParameter("LogoPath", logouri))
+                params.Add(New ReportParameter("LogoPath", $"file://{Imagen.FullName}"))
             Else
                 params.Add(New ReportParameter("LogoPath", ""))
             End If