Visual Basic - CRYSTALREPORT.DISCARDSAVEDATA=TRUE ¡¡¡ urgente !!

HOLA DE NUEVO, ¿PORQUE NO ME FUNCIONA ESTO? Gracias

SET ..... sentencia sql
DATA1.REFRESH
CR1.DISCARDSAVEDATA=TRUE
CR1.ACTION=1

La sentencia sql la hace bien, pero cuando a dicha sentencia le cambio la condición de selección, el informe que me sale es el de siempre.

¡¡¡ Ayundenme PorFavor !!!

TE FALTO PONER LA LETRA "D" EN MEDIO, DE ESTA MANERA SE HACE :

CR1.DISCARDSAVEDDATA = TRUE

Pepe, Gracias, pero la d fue un error mecanografico, en el codigo esta bien, pero es que no me funciona, realmente ahora lo tengo de la siguiente forma:

Private Sub Command2_Click()
Form8.CRlistados.ReportFileName = "c:\gestionvb6\agenda.rpt"
Form8.CRlistados.Formulas(0) = "promocion= """ & cabpromocion & """"
Set tclientes = basededatos.OpenRecordset("select * from tablaclientes where codpromocion = " & Val(cabcodpromocion) & " order by nombre1", dbOpenDynaset)
Data1.Refresh
Form8.CRlistados.DiscardSavedData = True
Form8.CRlistados.Action = 1
proc_vaciar
End Sub

puedes ayudarme, ? gracias