Verify Database: "the database Tablename has changed"

See more:

VB6

PDF

CrystalReports

Hi
I have a vb6 application to export a particular crystal to a pdf format. I Wrote the following code in button click event.

Dim crxApplication As CRAXDDRT.Application
Dim oReport As CRAXDDRT.Report
Dim crxExportOptions As CRAXDDRT.ExportOptions
Dim myDatabase As String

Set crxApplication = New CRAXDDRT.Application
Dim crxTable As CRAXDDRT.DatabaseTable

Set oReport = crxApplication.OpenReport(App.Path & "\sample.rpt", 1)
oReport.FieldMappingType = crAutoFieldMapping
For Each crxTable In oReport.Database.Tables
    crxTable.SetLogOnInfo servername, Database, userid, password
Next

Set crxExportOptions = oReport.ExportOptions
crxExportOptions.DestinationType = crEDTDiskFile
crxExportOptions.DiskFileName = App.Path & "\MyReport.pdf"
crxExportOptions.FormatType = crEFTPortableDocFormat
crxExportOptions.PDFFirstPageNumber = 1
crxExportOptions.PDFLastPageNumber = 1
crxExportOptions.PDFExportAllPages = True
oReport.Export False

It works fine. but while i click the button the following warning message occurs.
The database file "tablename" has changed. Proceeding to fix up the report!
I verified the crystal report and save it. While directly open crystal report file it works finely. please help to overcome this warning

[edit]Spurious tags removed, title, code block added - OriginalGriff[/edit]