Ajuste balanza de comprobaciones, efacturas valida de copia de pdf

Compras/eFacturas.aspx.vb

@@ -1704,15 +1704,12 @@ Partial Class Compras_eFacturas
                         Hilo.Start()
                     Else
                         Dim PDfDestino As String = $"{UsuarioActual.Empresa.Ruta}\Compras\{FF.EmisorRFC}\{FF.CveFactura}.PDF"
-                        If File.Exists(PDfDestino) Then
-                            File.Delete(PDfDestino)
-                        End If
-                        Try
+                        If File.Exists(RutaPDF) Then
+                            If File.Exists(PDfDestino) Then
+                                File.Delete(PDfDestino)
+                            End If
                             File.Move(RutaPDF, PDfDestino)
-                        Catch ex As Exception
-
-                        End Try
-
+                        End If
                     End If
 
                 End If