FoxPro/Visual FoxPro - exportar un reporte de crystal report

hola a todos, estoy tratando de exportar un reporte rpt de crystal report a exel, word, html, pdf y no he podido hacerlo si hay alguien que lo haya echo si me puede ayudar y corregir la rutina que tengo y si puede decirme cuales son los códigos de exportación para estos formatos
en crystal report 8 o bien 8.5

cuando intento hacer la exportacion se produce un error y me da el siguiente mensage:
Codigo de excepcion OLE IDispatch 0 Crystal Report ActiveX Designer: The remaining text does not appear to be part of the formula...

y no se que sera.
gracias.

** Crea una instancia del RDC de Crystal Reports.
loCR= CREATEOBJECT( "CrystalRuntime.Application")
** Abre el reporte y guarda una referencia en ‘loRpt’.
loRpt= loCR.OpenReport(ThisForm.fnnombrerpte) && este es el nombre del reporte
** Descarta los datos que se hayan grabado con el reporte.
IF loRpt.HasSavedData
loRpt.DiscardSavedData()
ENDIF
** Cambia la ubicación de la tabla en el reporte.
loRpt.Database.Tables( 1).Location= ThisForm.fnnombredbf && esta es la tabla
IF !EMPTY(ThisForm.fntxtemp) && esto es un valor de parametro del titulo
FOR lnI=1 TO loRpt.FormulaFields.Count
IF UPPER(loRpt.FormulaFields( lnI).FormulaFieldName) = "EMPRESA"
loRpt.FormulaFields( lnI).Text= ThisForm.fntxtemp
ENDIF
ENDFOR
ENDIF
** Exportar a formato PDF.
WITH loRpt.ExportOptions
** Destino: 1=Archivo, 2=MailMAPI, 5=Aplicación.
.DestinationType= (oBFile) && tipo almacenamiento
** Tipo formato: 35=RTF exacto, 27=Excel, 32=HTML, 31=PDF etc.
.FormatType= (oBExpo) && formato a exportar el informe
** Nombre del archivo exportado. Necesario si DestinationType <> de 5.
.DiskFileName= (oBCRFile) && nombre del archivo donde queda la exportacion
ENDWITH
loRpt.Export( .F. )
IF ThisForm.cboTypeFile.Value<>"Archivo"
DELETE File (oBCRFile)
ENDIF

yo uso cristal report XI por que es mas moderno
a (oBExpo) le doy el valor 31
y utilizo estas sentencias (logicamente el resto tu ya lo sabes

lorpt.ExportOptions.FormatType = 31
Lorpt.ExportOptions.DestinationType = 1
LORPT.EXPORTOPTIONS.DISKFILENAME="C:\projects2.pdf"
LORPT.EXPORT(.F.)

esto a mi me funciona pero en el XI espero que a ti tambien

suerte , hasta luego

hola a todos, necesito si alguien me puede ayudar, me cambiaron la version de crystal report la 7 que usaba y funcionaba sin problemas por la 11, y ahora no se conectan los reportes, alguien tiene un ejemplo de como hacer las vistas previas de los reportes, desde ya muchas gracias

hola lion yo presento el mismo problema con crystal report 8.0 a mi me exporta para un documento word pero me sale lleno de cuadros desconfigurado si ya resolvistes y me podrias ayudar con este error este es mi correo [email protected] te lo agredeceria. Saludos