export from crystal without using crystal viewer

[jgo333n]

I have a Crystal report in memory the dataset is populated but when i try to export to pdf all i get is a blank report.
The code is below can someone spot what i am missing?

Dim crystalReport As ReportDocument
Dim strFileName As String
Dim strExportPath
For Each objReport As clsCrystalReport In objcolReports
crystalReport = New ReportDocument
strFileName = objReport.FullPath + objReport.ReportName
strExportPath = objReport.ExportPath + objReport.ExportName

crystalReport.Load(strFileName)
crystalReport.SetDataSource(objReport.DataSource)
crystalReport.Refresh()
crystalReport.ExportToDisk(CrystalDecisions.[Shared].ExportFormatType.PortableDocFormat, strExportPath)
Next

 

[jgo333n]

ignore this i have been an idiot i was passing in the wrong parameters in to the stored procedure s thus getting no data.