FoxPro/Visual FoxPro - CRYSTAL Y FOXPRO AYUDA

 
Vista:

CRYSTAL Y FOXPRO AYUDA

Publicado por ANTONY (6 intervenciones) el 05/06/2007 22:56:11
HOLA ESPERO Y ALGUIEN PUEDAD AYUDAREME MI PROBLEMA ES QUE ESTOY UTILIZANDO EL FOXPRO PERO LOS INFORMES LO QUIERO HACER EN CRYSTAL REPORTE EL PROBLEMA QUE TENGO ES QUE NO PUEDO HACER QUE LOS DATOS QUE CAPTURE EN MI TABLA TEMPORAL APARESCAN EN EL REPORT5EDOR DE CRYSTAL ME DICE QUE LA CONEXION CONEXION NO ES POSIBLE POR QUE PASA ESE ERROR LE MANDO EL CODIGO OJALA PUEDA ALGUIEN AYUDARME

** Crea una instancia del RDC de Crystal Reports.
loCR= CREATEOBJECT( "CrystalRuntime.Application")

** Abre el reporte y guarda una referencia en ‘loRpt’.
loRpt= loCR.OpenReport( "c:\prueba\info.RPT")

** Descarta los datos que se hayan grabado con el reporte.
IF loRpt.HasSavedData
loRpt.DiscardSavedData()
ENDIF

** Crea nombre para tabla temporal que va a estar

** ubicada en la carpeta TEMP de Windows.

lcTabla= ADDBS( GETENV("TEMP"))+ SYS(3)+ ".DBF"

SELECT clientes.id_cli,clientes.nombre,clientes.apellidos FROM clientes INTO CURSOR curPedidos


SELECT curPedidos
COPY TO ( lcTabla ) TYPE FOX2X AS 850

** Cambia la ubicación de la tabla en el reporte.
loRpt.Database.Tables( 1).Location= lcTabla

thisform.OleControl1.reportsource = loRpt
thisform.OleControl1.viewreport

** Imprime el reporte con los datos de la nueva ubicación.
*loRpt.PrintOut()
** Borra la tabla temporal.

DELETE FILE ( lcTabla )
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder