Paso de parametros a subreporte

Sergio
10 de Marzo del 2005
Tengo el siguiente codigo en Visual Basic 6:
With CrResumen
.Connect = "DSN=cedulacion;UID=sa;PWD=sa"
.ReportFileName = "C:CedulacionReportesRESUMEN DE PRECIOS VIGENTES.rpt"
.ParameterFields(0) = "CodigoEmpresa;" & cEmpresa & ";True"
.ParameterFields(1) = "TipoCambio;" & TipoCambio & ";True"
.ParameterFields(2) = "NEmpresa;" & NombEmpresa & ";True"
.SubreportToChange = "Descuentos"
.ParameterFields(0) = "CodigoEmpresa;" & cEmpresa & ";True"
.WindowState = crptMaximized
.Action = 1
End With
pero al ejecutar el codigo de todos modos me pide el parametro para el subreporte, porfavor que alguien me diga que estoy haciendo mal, muchas gracias.