Crystal Report - Crystal Report 8 y VB 6

Hola:

Estoy utilizando Visual Basic 6 y Crystal Reports 8.

El código siguiente es lo que tengo en el visual basic para mandar los parámetros al reporte:
txtMovP_Tipo.xValor = "O"

rptConsGralMovEnt.ReportFileName = "C:\Almacen\ConsGralMovEnt2.rpt" '"ConsGralMovEnt.rpt" 'App.Path & "\Proyectos\ConsGralMovEnt.rpt"
rptConsGralMovEnt.ParameterFields(0) = "ConsFechaInicial;" & FechaInicial.xValor & ";true"
rptConsGralMovEnt.ParameterFields(1) = "ConsFechaFinal;" & FechaFinal.xValor & ";true"
rptConsGralMovEnt.ParameterFields(2) = "Tipo;" & txtMovP_Tipo.xValor & ";true"
rptConsGralMovEnt.Action = 1

El control que estoy utilizando es el Data Report y el componente que tengo es:

Crystal Report Control

Me marca un error al ejecutar la ultima instrucción (rptConsGralMovEnt.Action = 1). Dice que no se puede cargar el archivo.

Que es lo que podra estar faltando ???

Hola chica, yo tengo un codigo para imprimir la fecha inicial a la final.
es el siguiente:
Private Sub Command2_Click()
CrystalReport1.DataFiles(0) = App.Path + "\mantenimiento1.Mdb"
CrystalReport1.ReportFileName = App.Path + "\salidavehiculos.Rpt"
CrystalReport1.Formulas(0) = "DESDE='" & DTPicker1.Value & "'"
CrystalReport1.Formulas(1) = "HASTA='" & DTPicker2.Value & "'"
Y1 = Year(DTPicker1.Value)
Y2 = Year(DTPicker2.Value)
m1 = Month(DTPicker1.Value)
m2 = Month(DTPicker2.Value)
d1 = Day(DTPicker1.Value)
d2 = Day(DTPicker2.Value)
CrystalReport1.SelectionFormula = "{salidavehiculos.Fecha} in Date(" & Y1 & "," & m1 & "," & d1 & ") to Date(" & Y2 & "," & m2 & "," & d2 & ") startswith '" & Text1 & "'"
CrystalReport1.Action = 1
End Sub

y en el crystal report tienes que colocar DESDE y HASTA en el menu insertar y luago donde diche campo de formula y hay agregas dos que son el desde y el hasta y los guardas y lo insertas en el reporte. Nose si es eso lo que quieres de todas manera cualquier cosa enviame la nota a mi correo a ver en que te puedo ayudar.

Gracias,
voy a hacerlo como me dices y yo te aviso :D