I'm trying to export a crystal report using Access VBA. The report is written in Crystal 8 and is connected to an Oracle database using native Oracle drivers.
my code is as follows:
Dim crxApp As New CRAXDRT.Application
Dim crxReport As CRAXDRT.Report
Set crxReport = crxApp.OpenReport("R:\GB Payments - Vendor Master Data.rpt")
With crxReport
With .ExportOptions
.DiskFileName = "H:\G&B\test.ttx"
.DestinationType = crEDTDiskFile
.FormatType = crEFTTabSeparatedText
End With
'Don't prompt for export options
.Export False
End With
Set crxReport = Nothing
Set crxApp = Nothing
However when the code reaches the ".Export False " line in the code I get a error message as follows:
Run time error '-2147191776 (80047420)'
Too many arguments have been given to this function.
Does anyone have any ideas why this might be?
my code is as follows:
Dim crxApp As New CRAXDRT.Application
Dim crxReport As CRAXDRT.Report
Set crxReport = crxApp.OpenReport("R:\GB Payments - Vendor Master Data.rpt")
With crxReport
With .ExportOptions
.DiskFileName = "H:\G&B\test.ttx"
.DestinationType = crEDTDiskFile
.FormatType = crEFTTabSeparatedText
End With
'Don't prompt for export options
.Export False
End With
Set crxReport = Nothing
Set crxApp = Nothing
However when the code reaches the ".Export False " line in the code I get a error message as follows:
Run time error '-2147191776 (80047420)'
Too many arguments have been given to this function.
Does anyone have any ideas why this might be?