Cambios en carta de proveedor

Compras/EvaluacionProveedor.aspx.vb

@@ -334,9 +334,10 @@ Partial Class Compras_EvaluacionProveedor
             'ObjCarta.Guardar(PathDestino)
             ObjCarta.GuardarStreamPDF()
             archivoCarta.ArchivoBinario = ObjCarta.GetBytesDocumento()
+
             Dim fileinfo As New FileInfo(PathDestino)
             Dim baseUrl As String = Request.Url.GetLeftPart(UriPartial.Authority) & "/temp/" & fileinfo.Name
-            Dim baseUrl As String = Request.Url.GetLeftPart(UriPartial.Authority) & "/temp/" & fileinfo.Name
+
             If File.Exists(PathDestino) Then
                 File.Delete(PathDestino)
             End If