Error al exportar PDF con Crystal

[Bravenap]

Muy buenas. Hasta hace unos días esto funcionaba y poco a poco, algunos reportes han comenzado a dar errores, aunque creo que es más al abrir el PDF que al exportarlo realmente. La función que utilizo tiene la posibilidad de seleccionar si se exporta en PDF o en Word. Este último no me da ningún tipo de problemas.

El error que obtengo en Adobe Acrobat es. Distintivo desconocido: '0,05'.

Código:

Private Sub generaFactura(ByVal tipo As CrystalDecisions.Shared.ExportFormatType)

        Try
            Dim rpt As New CrystalDecisions.CrystalReports.Engine.ReportDocument
            rpt.Load(Server.MapPath("../Reportes/Factura.rpt"), CrystalDecisions.[Shared].OpenReportMethod.OpenReportByTempCopy)
            rpt.SetParameterValue("NumFactura", Me.txtNumFactura.Text)
            rpt.SetParameterValue("FechaVisado", Me.lblFechaFacturacion.Text)
            rpt.SetParameterValue("Clave", Me.ddlTipos.SelectedItem.Text)
            rpt.SetParameterValue("SistemaCobro", Me.rblCobro.SelectedValue)
            rpt.SetParameterValue("NumCliente", Me.txtNumCliente.Text)
            rpt.SetParameterValue("Cliente", Me.txtCliente.Text)
            rpt.SetParameterValue("Concepto", Me.txtTitulo.Text & ". " & Me.txtLocalidad.Text.Trim & " (" & Me.ddlProvincias.SelectedItem.Text & ")")
            rpt.SetParameterValue("Observaciones", Me.txtObservacionesVisado.Text)
            rpt.SetParameterValue("Precio", Me.txtPrecio.Text)
            rpt.SetParameterValue("TipoIVA", Me.txtTipoIVA.Text)
            'Se envía el informe
            Dim rptStream As New IO.MemoryStream
            rptStream = rpt.ExportToStream(tipo)
            Response.Clear()
            Response.Buffer = True
            If tipo = CrystalDecisions.[Shared].ExportFormatType.PortableDocFormat Then
                Response.ContentType = "application/pdf"
                Response.AddHeader("Content-Disposition", "attachment;filename=" & "Factura" & Me.txtNumFactura.Text & ".pdf")
            Else
                Response.AddHeader("Content-Disposition", "attachment;filename=" & "Factura" & Me.txtNumFactura.Text & ".doc")
                Response.ContentType = "application/msword"
            End If
            Response.BinaryWrite(rptStream.ToArray())
            Response.End()
        Catch ex As CrystalDecisions.CrystalReports.Engine.ParameterFieldCurrentValueException
            mens(ex.StackTrace & "<br>" & ex.Message)
        End Try

    End Sub

Un saludo.

[Bravenap]

Administradores, por favor, borren este mensaje que se me ha duplicado por error.

Gracias y un saludo.

[Pato2]

Ok, mira no se si lograste darle solucion a tu problema pero...

a mi me paso lo mismo lo del "Distintivo desconocido: '0,05'" y lo que realice para solucionarlo fue:

1. Reinstalar el el Acrobat y el Crystal.
2. Reiniciar el servidor o PC.
3. Listo problema resuelto.

Espero sirva de algo o no sea demaciado tarde.

Pura Vida!

[Bravenap]

Bien, muchas gracias. Más vale tarde que nunca. Lo probaré, aunque en el servidor no tengo instalado Crystal Reports.

Un saludo y gracias de nuevo.