Hola.
Trabajo con V.B. 6.0 para Base de Datos con Access 2007 y para los reportes con Crystal Reports 11.5.8
Con Crystal no me manejo mucho. Y me aparece el siguiente error al hacer clic.
“Aquí se requiere una cadena”
El código es:
Private Sub cmdBoton_Click()
Screen.MousePointer = vbHourglass
Set Aplication = New CRAXDRT.Application
Set prcdReport = Aplication.OpenReport("C:\Archivos de programa\Business Objects\Crystal Reports 11.5\Reporte\Listado.rpt")
prcdReport.Database.SetDataSource prcdReport
prcdReport.EnableParameterPrompting = False
prcdReport.DiscardSavedData
prcdReport.ExportOptions.DestinationType = crEDTDiskFile
prcdReport.ExportOptions.Parent.DisplayProgressDialog = True
prcdReport.RecordSelectionFormula = "{IngresoVales.Fecha} in Date(" & Year(DTPicker1) & "," & Month(DTPicker1) & "," & Day(DTPicker1)
& ") AND {IngresoVales.Fecha} to Date(" & Year(DTPicker2) & "," & Month(DTPicker2) & "," & Day(DTPicker2) & ")"
End Sub
Si me pueden dar una mano desde ya muchas gracias.
Saludos.