Logotipos correciones

Compras/CatProveedores.aspx.vb

@@ -254,7 +254,7 @@ Partial Class Compras_CatProveedores
     Protected Sub LnkCtasBanc_Click(sender As Object, e As EventArgs)
 
         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)
+
         Dim DtDatos As DataTable = Nothing
         Dim ObjBancos As New ClsBancos
 
@@ -270,7 +270,7 @@ Partial Class Compras_CatProveedores
             params.Add(New ReportParameter("NombreEmpresa", UsuarioActual.Empresa.Empresa))
 
             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