Here is the code to export a report to .pdf format, not sure if you can export to .dbf though
Code:
Dim CRExportOptions As Object
Dim expfile As String
Dim CApp As New CRAXDRT.Application
Dim CReport As CRAXDRT.Report
expfile = "C:\Test.rpt"
Set CReport = CApp.OpenReport(expfile)
CReport.EnableParameterPrompting = False
CReport.DiscardSavedData
CReport.ReadRecords
Set CRExportOptions = CReport.ExportOptions
CRExportOptions.FormatType = crEFTPortableDocFormat
CRExportOptions.DestinationType = crEDTDiskFile
CRExportOptions.DiskFileName = Left(expfile, Len(expfile) - 3) & "pbf"
CReport.DisplayProgressDialog = False
CReport.Export False