Crystal Report - Parametros y VB6

Hola.Necesito pasar parametros a un informe y no deseo que me aparezca la peticion de datos que hace crystal antes de mostrar el informe.Lo he intentado con ParameterFields, pero no lo hace nada bien.
Espero ayudas y sugerencias, incluso con parameterfields, pues es posible que no lo este usando bien.
Gacias por adelantado.

usa esto con las siguiente condiciones debes crear un dato de formula en tu informe

Crystal.Formulas(0) = "valor1 = '" & valor2 & "'"
donde valor1 es el nombre de la formula que colocas en tu informe y valor2 es el parametro.
crystall enumera las formulas osea que formula(0) hace referencia a tu primera formula si deceas mas parametros agrega otro campo de formula a tu informe y asunto terminado ha para valores numericos no uses las comillas simples.
espero que te sirva

De este modo yo envio parametros para Crystal y parametros que usara un proceso almacenado en sql server 7:
Dim lcryAplicReporte As New CRAXDRT.Application
Dim lcryParametros As CRAXDRT.ParameterFieldDefinitions
Dim lcryParametro As CRAXDRT.ParameterFieldDefinition
Set gcryReporte = lcryAplicReporte.OpenReport("c:\reporte.rpt")
With gcryReporte
.Database.Tables.Item(1).SetLogOnInfo "Servidor", "BaseDatos", "Usuario", "ClaveAcceso"
.DisplayProgressDialog = False
.EnableParameterPrompting = False
End With
Set lcryParametros = gcryReporte.ParameterFields
For Each lcryParametro In lcryParametros
With lcryParametro
Select Case .ParameterFieldName
'Parametro que usara Crystal reports
Case "prmCryFechaIni": .SetCurrentValue Now()
'Parametro que usara el proceso almacenado que es la fuente
'de datos del reporte
Case "prmSqlFechaIni": .SetCurrentValue Now()
End Select
End With
Next lcryParametro
Select Case giDestino
Case 1 'Impresora
With gcryReporte
.SelectPrinter Printer.DriverName, Printer.DeviceName, Printer.Port
.PaperOrientation = crLandscape
.PrintOut False, gstcReporte.iCopias
End With
Case Else ?Video
'Forma con el control para visualizar el reporte
frmVtasMesRep.Show vbModal
Set frmVtasMesRep = Nothing
End Select
DoEvents
Set gcryReporte = Nothing
Set lcryAplicRep

Informe.EnableParameterPrompting = False
con esta instrucción podrás inhibir la petición de parámetros de CR.