Hola Chicos.
Trabajo con V.B. 6.0 para Base de Datos con Access 2007 y para los reportes con Crystal Reports 11.5.8
Me aparece el siguiente error al hacer clic: “Aquí se requiere una cadena”.
Error lo indica en la línea prcdReport.RecordSelectionFormula = "{IngresoVales.Fecha} in .....
El código es:
Private Sub cmdBoton_Click()
Screen.MousePointer = vbHourglass
Set Aplication = New CRAXDRT.Application
Set prcdReport = Aplication.OpenReport("C:Archivos de programaBusiness ObjectsCrystal Reports 11.5ReporteListado.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
Espero haber sido claro. Si me pueden dar una mano desde ya muchas gracias. Saludos.
