dont forget to verify the table as well, as I was pulling my hair out with this, as I could see the updated data when ever I replsced the data with a new selection.
oCrystal=CreateObject('Crystal.CRPE.Application')
oReport=oCrystal.OpenReport('report1 .rpt')
oReport.database.Verify
and if you want topreview
oReport.Preview
or toprintwith out user intervenstion
oReport.Printout(.F.)