The following code works perfectly to refresh the data & preview my report, in Vbasic...

Dim CrystalApplication As CRPEAuto.Application
Dim CrystalReport As CRPEAuto.Report

Private Sub Form_Load()
Set CrystalApplication = CreateObject("Crystal.CRPE.Application")
Set CrystalReport = CrystalApplication.OpenReport("C:\Program Files\Seagate Software\Crystal Reports\A.rpt")

Private Sub CmdPrintReport_Click()
Call CrystalReport.DiscardSavedData
Call CrystalReport.Database.Verify
CrystalReport.Preview
End Sub

!!!THE EQUIVALENT FOX CODE listed below DOES NOT!!! WHY!??!

LCrwApp=Createobject('Crystal.CRPE.Application')
LCrwRep=LCrwApp.OpenReport("C:\Program Files\Seagate Software\Crystal Reports\A.rpt")
LCrwRep.DiscardSavedData
LcrwRep.Database.verify
LcrwRep.Preview

ARE WHY WE GOING TO ADMIT TO ANY SUPERIORITY IN VB?!!!